Question

我试图使用复选框隐藏excel中的几个非连续行。我成功地隐藏了彼此相邻的行，但没有隐藏不行的行。这是我的代码不起作用：

Private Sub CheckBox6_Click()

If CheckBox6 = True Then


Range("Report!45:45,Report!46:46,Report!48:48,Report!50:50").EntireRow.Hidden = False

Else: [Report!45:51].EntireRow.Hidden = True

End If

End Sub

任何帮助将不胜感激！谢谢！

Answer 1

尝试：

Private Sub CheckBox6_Click()
[Report!45:51].EntireRow.Hidden = False

If CheckBox6 = True Then
    Worksheets("Report").Range("47:47,49:49,51:51").EntireRow.Hidden = True
Else
    [Report!45:51].EntireRow.Hidden = True
End If


End Sub

使用复选框隐藏excel中的非连续行

1 个答案: