增加、删除完全可以自动更新的工作表目录_excel

做了很多期的图表教程了，今天我们来分享点平时问的比较多的工作表目录
其实前面我们也做过工作表目录的教程，只是那个没有办法自动更新，一旦有新增或者删减不是很方便。
今天我们就来分享一个小白都可以套用的
技巧18 -全自动更新的工作表目录

效果图

不管是新增还是工作表删除，我们来到目录都可以看到目录是最新的
而且可以双击切换到对应的工作表，非常好用，全自动更新！

教程

1、点击开发工具-Visual Basic（或者使用快捷键：ALT F11）
2、双击对应的工作笔目录
3、复制代码，粘贴进去

代码通用，不用考虑特殊情况的问题，主要注意文件有有一个工作表名称叫目录即可
代码：

'功能：自动生成文件目录'作者：Excel办公实战-小易Private Sub Worksheet_Activate() Columns("A:B").Clear Range("A1:B1") = [{"序号","表名"}]Dim sht As Worksheet, n As Integer n = 1 For Each sht In Worksheets If sht.Name <> "目录" Then n = n1 Cells(n, 1) = n - 1 Cells(n, 2) = sht.Name End If Next With Range("a1").CurrentRegion .Borders.LineStyle = 1 .RowHeight = 18 End WithEnd Sub'功能：双击跳转到对应的工作表'作者：Excel办公实战-小易Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column <> 2 Or Target.Cells.Count <> 1 Then End If Target.Value <> "" Then Cancel = True Worksheets(Target.Value).Select End IfEnd Sub
系列往期教程导航
【技巧1001-1】谁绿了Excel
【技巧1001-2】3秒搞定最大、最小、首次、最新
【技巧1001-3】批量提取姓名电话号码
【技巧1001-4】-批量提取文件名并建立超链接
【技巧1001-5】-数据透视表字段批量计数转求和，效率提高100%！
【技巧1001-6】-Excel版的AI智能处理
【技巧1001-7】-元和万元之间自由切换
【技巧1001-8】-终极指南|0基础制作工作表目录
【技巧1001-9】-看完，还不会按颜色求和就是你的不对了
【技巧1001-10】-下拉列表居然可以多?。浚?
【技巧1001-11】-Excel删除重复值，我用了7种方法
【技巧1001-12】- Excel多列内容合并的6种方法
【技巧1001-13】-项目进度图你会几种？
【技巧1001-14】-实战图表|不一样的百分比图(上)
【技巧1001-15】-实战图表|不一样的百分比图(中篇)-水缸百分比图
【技巧1001-16】-实战图表|百分比图（下篇）-方格百分比
【增加、删除完全可以自动更新的工作表目录】【技巧1001-16】- 柱形百分比组合图怎么玩？

增加、删除完全可以自动更新的工作表目录

效果图

教程

相关经验推荐