Question

vba快速跳转到指定位置

有一个工作博，里面有数十张表格，已经建立了一个索引目录，可以从索引目录跳转到任意一张表格，但是没办法从表格返回到索引目录，有没有会vba的帮我设置下

Answer 1

以下代码可以实现输入工作表名称，按回车或点击确定后跳转至当前工作簿的该工作表 Sub 跳转()Dim sn As StringDim x As Integersn = InputBox("请输入要跳转到的工作表的名字")For i = 1 To Sheets.CountIf Sheets(i).Name = sn ThenSheets(i).Activatex = 1End IfNext iIf x = 0 ThenMsgBox ("当前工作簿中没有以" & sn & "命名的工作表")End IfEnd Sub已上传附件，点击按钮即可验证

追问

代码不对啊，是在vba输入还是在哪里