如何使用 excel 中的单元格值来使用目标范围

Question

我在下面的 excel 中有这个隐藏和取消隐藏行的公式。我想让它成为一个动态参考。所以不要使用范围 "B50" 或范围“51:68”。我想将上述引用设置为一个单元格值，这样我就可以随时更改它们而无需打开 VBA.

公式：

     If Not Intersect(Target, Range("B50")) Is Nothing Then Cancel = True
     If (Not Intersect(Target, Range("B50")) Is Nothing) And (Target.Count = 1) Then
     Set hideRows = Range("51:68")
     hideRows.EntireRow.Hidden = Not hideRows.EntireRow.Hidden
     End If

Answer 1

If Not Intersect(Target, Me.Range(Sheet1.Range("A1").Value) Is Nothing Then`

...其中 Sheet1 A1 有您要使用的单元格地址

如果地址与事件处理程序运行所在的 sheet 相同，则：

If Not Intersect(Target, Me.Range(Me.Range("A1").Value) Is Nothing Then`

如何使用 excel 中的单元格值来使用目标范围

How to use Target Range using the cell value in excel

excel

vba

reference

target