VBA - 隐藏单独的行，没有范围答案

【问题标题】：VBA - Hide individual rows, no rangeVBA - 隐藏单独的行，没有范围
【发布时间】：2019-06-24 09:16:15
【问题描述】：

我对 VBA 很陌生，所以这可能是一个非常基本的问题，但不知何故我在互联网上找不到解决方案。

我有一个切换按钮，它应该通过单击来隐藏/取消隐藏某些行。唯一的事情是我不希望（取消）隐藏一系列行，而只希望隐藏一些预选的行（例如，只有第 1、4、7 和 9 行）。

我搜索了互联网，但一切似乎都是关于行范围而不是单个行。

Private Sub RWCATSHC()
    With Rows("227:243")      (this part I want it to be just a few selected ones)
        .Select
       .EntireRow.Hidden = Not .EntireRow.Hidden
    End With
End Sub

如上所述，这可能是一个非常基本的问题，但我是新手，因此非常感谢任何帮助。

提前致谢！

【问题讨论】：

标签： excel vba hide rows

【解决方案1】：

这将起作用：

Private Sub RWCATSHC()


     Rows(1).EntireRow.Hidden = Not Rows(1).EntireRow.Hidden
     Rows(4).EntireRow.Hidden = Not Rows(4).EntireRow.Hidden
     Rows(7).EntireRow.Hidden = Not Rows(7).EntireRow.Hidden
     Rows(9).EntireRow.Hidden = Not Rows(9).EntireRow.Hidden

End Sub

【讨论】：