如何解决选择和隐藏2个命名行之间的整个行
我有两个命名行,它们之间的信息是我想在隐藏和未隐藏之间切换的。我不想使用数据分组,因为命名行之间的信息经常移动。
上排YEAR2019和YEAR2020始终保持可见。
我目前正在尝试此操作,但是收到错误消息,似乎无法使其正常工作-
Sub HideRowsYEAR2020()
Range(.Cells(.Range("YEAR2019").Row + 1),_
.Cells(.Range("YEAR2020").Row - 1)).Select
If Selection.EntireRow.Hidden Then
Selection.EntireRow.Hidden = False
Else
Selection.EntireRow.Hidden = True
End If
End Sub
解决方法
使用.
时,它应该在with语句中。像With ActiveSheet
也Cells()
希望将列引用作为第二个条件。
Sub HideRowsYEAR2020()
With ActiveSheet 'Should change to actual sheet
With .Range(.Cells(.Range("YEAR2019").Row + 1,1),.Cells(.Range("YEAR2020").Row - 1,1))
If .EntireRow.Hidden Then
.EntireRow.Hidden = False
Else
.EntireRow.Hidden = True
End If
End With
End With
End Sub
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。