VBA - 隐藏单独的行,没有范围
VBA - Hide individual rows, no range
我对 VBA 很陌生,所以这可能是一个非常基本的问题,但不知何故我无法在互联网上找到解决方案。
我有一个切换按钮,点击它应该 hide/unhide 一些行。唯一的问题是我不希望(取消)隐藏一系列行,而只希望隐藏一些预选行(例如,仅第 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
如前所述,这可能是一个非常基本的问题,但我是新手,因此非常感谢任何帮助。
提前致谢!
这会起作用:
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
我对 VBA 很陌生,所以这可能是一个非常基本的问题,但不知何故我无法在互联网上找到解决方案。
我有一个切换按钮,点击它应该 hide/unhide 一些行。唯一的问题是我不希望(取消)隐藏一系列行,而只希望隐藏一些预选行(例如,仅第 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
如前所述,这可能是一个非常基本的问题,但我是新手,因此非常感谢任何帮助。
提前致谢!
这会起作用:
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