当Excel中的工作表数量很多时，有一个带链接的目录真是太方便了，如下图所示，当我们选中“目录”表中对应A列的表名就会跳转到对应的表并自动隐藏其他的表 。
这样的Excel工作表目录该如何制作呢？下面小编就带大家了解一下制作原理及步骤吧！
首先我们需要新建一个空白的工作表，重命名为“目录”，作为我们制作目录的存放的位置 。
然后，右击“目录”工作表名称标签，点击“查看代码”命令，自动弹出VBA代码录入编辑窗口，将下面的一段VBA代码复制粘贴到窗口中 。最后关闭VBA窗口即可 。如下图所示：
VBA代码如下：
Private Sub Worksheet_Activate()On Error Resume NextSheets("目录").Range("A1") = "目录"k = 1For Each sh In SheetsIf sh.Name <> "目录" Thenk = k1Sheets("目录").Cells(k, 1) = sh.NameEnd IfNextSheets("目录").Range("A:A").EntireColumn.AutoFitSheets("目录").Range("A:A").EntireColumn.Horizo
推荐阅读
- 奥迪a4l汽车座椅怎么调节合适 奥迪a4l车座椅怎么调整
- AI illustrator怎么导出其它版本的ai格式文件？AI导出其它ai版本文件教程！
- pe下格式化错误000000 进pe格式不了硬盘提示00000错误什么意思
- 麦克风声音小怎么调整
- 求一张全透明的图片 png格式的
- 如何把wps文档转换成图片格式？怎样把wps文字文档变成图片？
- 腿弯怎么变直小妙招 get起来
- 微信支付如何调整付款方式的顺序 怎么调整微信付款方式的顺序
- 华为手机怎么调整照片大小
- 三国群英传怎么调整兵种 三国群英传调整兵种方法