在excel2010怎样使用VBA实现:根据某个单元格的内容来判断是否隐藏某些特定的行?

2024-11-28 23:36:03
推荐回答(3个)
回答1:

Sub myHide()
Dim Rng As Range
If ActiveWindow.RangeSelection.Count = 1 Then End '如果不是多选就结束
For Each Rng In ActiveWindow.RangeSelection '历遍每个选择区里单元格
If Rng.Value = "条件" Then '如果有单元格符合条件
ThisWorkbook.ActiveSheet.Rows(Rng.Row).Hidden = True '隐藏这一行
End If
Next
End Sub

回答2:

用宏遍历一遍在用的行,如果改行状态为隐藏,则记录该行号,并且将结果存放在指定(某个)单元格中

回答3:

If then