如果你的Excel 工作簿内有成百上千个工作表, 要查找其中的某一个工作表会很麻烦。使用下面的VBA 代码进行查询会极大的缩短查询时间。
Sub GoToSheet()
Application.ScreenUpdating = False
SheetName = Application.InputBox("输入要查询的工作表的名称:")
Sheets(SheetName).Select
Application.ScreenUpdating = True
End Sub
如果你的Excel 工作簿内有成百上千个工作表, 要查找其中的某一个工作表会很麻烦。使用下面的VBA 代码进行查询会极大的缩短查询时间。
Sub GoToSheet()
Application.ScreenUpdating = False
SheetName = Application.InputBox("输入要查询的工作表的名称:")
Sheets(SheetName).Select
Application.ScreenUpdating = True
End Sub