这只是技术的一个例子........你必须修改它以满足你的需要 . 说我们有:
使用单元格 C1 中的数据验证下拉菜单 . 将此事件宏放在工作表代码区域中:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim t As Range, mn As Variant
Set t = Range("C1")
If Intersect(t, Target) Is Nothing Then Exit Sub
mn = t.Value
Cells.EntireRow.Hidden = False
If mn = 0 Or mn = "" Then Exit Sub
For i = 2 To 24
mnt = Month(Cells(i, 1).Value)
If mnt <> mn Then
Cells(i, 1).EntireRow.Hidden = True
End If
Next i
End Sub
宏将监视您的选择并相应地显示/隐藏行 .
因为它是工作表代码,所以很容易安装和自动使用:
右键单击Excel窗口底部附近的选项卡名称
选择查看代码 - 这会打开一个VBE窗口
粘贴内容并关闭VBE窗口
如果您有任何疑虑,请先在试用工作表上试用 .
如果保存工作簿,宏将与其一起保存 . 如果您在2003年之后使用的是Excel版本,则必须将文件另存为.xlsm而不是.xlsx
要删除宏:
如上所述调出VBE窗口
清除代码
关闭VBE窗口
要了解有关宏的更多信息,请参阅:
和
要了解有关事件宏(工作表代码)的更多信息,请参阅:
Macros must be enabled for this to work!