请教EXCEL问题,如何用VBA
一般来说,如果表格不是很多,用excel的超链接功能即可实现。但是如果表格多了,用VBA就更为方便。可以按Alt+F11,在Sheet1中添加如下代码实现功能,希望符合你的要求 ^_^
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target。 Count > 1 Then Exit Sub
For i = 1 To Sheets。Count
If Sheets(i)。Name = Target。Text Then
Sheets(i)。 Select
End If
Next
End Sub。全部
一般来说,如果表格不是很多,用excel的超链接功能即可实现。但是如果表格多了,用VBA就更为方便。可以按Alt+F11,在Sheet1中添加如下代码实现功能,希望符合你的要求 ^_^
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target。
Count > 1 Then Exit Sub
For i = 1 To Sheets。Count
If Sheets(i)。Name = Target。Text Then
Sheets(i)。
Select
End If
Next
End Sub。收起