我試圖通過單擊單元格并使用相同的值激活作業表來設定一種跳轉到同一作業簿中作業表的方法。當單元格值為文本時，我的代碼有效。但是，當值為數字時它不起作用。大多數 (99%) 的作業表將僅為作業表名稱的數字（6 位數字）。作業表名稱的一個示例是 110110。這是我使用的代碼：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = False
If Selection.Count = 1 Then
If Not Intersect(Target, Range("B4:B800")) Is Nothing Then
If Target.Value <> "" Then
Sheets(Target.Value).Activate
End If
End If
End If
End Sub
我收到：運行時錯誤“9”：
下標超出范圍
每當我點擊
uj5u.com熱心網友回復：
在 Excel 中，您可以通過名稱或索引來參考作業表。
在您的情況下，您指的是 Excel 中不存在的索引（數字）。您可以使用 CStr() 將數字簡單地轉換為字串：
Sheets(CStr(Target.Value)).Activate
轉載請註明出處，本文鏈接：https://www.uj5u.com/ruanti/397051.html