在工作中，我们经常会碰到这种情况，一个工作簿里面有多个工作表，虽然带有目录，可以直接连接到对应工作表，但是却无法从各个工作表直接返回目录，本文将教你如何批量给工作表插入返回目录的按钮，让工作表操作更有效率。
工具/原料
excel2013以上版本
方法/步骤
1、【第一步】准备好需要插入返回目录按钮的工作簿，打开工作簿，需要确保工作簿有一个目录或者总表工作表，作为返回的对象。
2、【第二步】点击“开发工具”选项卡，再单击“查看代码”按钮，或者直接按下组合键Alt+F11，来打开VB代码编辑器窗口。
3、【第三步】再打开的VB代码编辑独瘦配溧窗口中插入一个新模块，将以下代码复制到模块中，点击运行SubButton()DimMyShtAsWorksheet,MyButt泠贾高框onAsButton,ShtNameAsStringShtName="目录"'如果不是目录，则改为其他名称ForEachMyShtInWorksheetsWithMyShtIf.Name<>ShtNameThen.Shapes(ShtName).Delete'SetMyButton=.Buttons.Add(50,10,60,30)WithMyButton.Name=ShtName'对按钮命名.Characters.Text="返回"&ShtName'指定按钮的标题.OnAction="backto"'指定按钮对应的宏命令EndWithEndIfEndWithNextSetMyButton=NothingEndSubSubbackto()Worksheets("目录").Activate[a1].SelectEndSub
4、【第四步】运行代码以后，最小化代码窗口，我们但会工作簿主界面，可以看到出了“目录”工作表，其他的工作表都已经自动插入了一个可以返回“目录”的按钮。
5、【第五步】当然按钮是可以更改参数擢爻充种的，Buttons.Add(50,10,60,30)方法中的4个参剞麽苍足数分别代表的是按钮的Xpos、Ypos、按钮宽度和按钮高度，比如我们将参数设置为Buttons.Add(100,100,100,50)。
6、【第六步】更改参数以后，我们再一次运行代码，就可以看到工作表中的按钮位置和大小发生了变化，按钮变大了很多，同样也可以实现“返回目录”的功能。
