Excel 允许您选择一个单元格并转到相应的工作表名称

Excel 允许您选择一个单元格并转到相应的工作表名称

我有以下代码,用于选择具有特定名称的单元格并转到以该单元格命名的工作表。

Dim ws As Worksheet
If Target.Address = "$A$1" Then
    For Each ws In ActiveWorkbook.Worksheets
        If ws.Name = Range("A1").Value Then
         ws.Activate
        End If
    Next ws
End If

但是我想对 A 列中的单元格执行此操作!A1-A306 我应该如何修改代码?

答案1

我会这样做 - 但它不是通过查看 .Address 的值来做到这一点

If Not (Intersect(Target, Range("A1:A306")) Is Nothing) Then
    For Each ws In ActiveWorkbook.Worksheets
        If ws.Name = Target.Value Then
         ws.Activate
        End If
    Next ws
End If

相关内容