你有一个工作表，里面有几十个上百个工作簿，该如何管理呢？
可以用VBA实现自动生成目录和超链接，这样在目录页就能够快速访问各个工作簿了，而且还能实时更新
先看看下面这个案例的效果：
该案例中，有多个工作簿，可以很方便地行管理。主要有以下功能：
1、能够自动生成目录和超链接，点击序号就看直达指定工作簿
2、删除或新建工作簿后，目录会同步更新
3、稍微增加代码，还可以实现在目录页删除指定工作簿（本案例无）
一、全部代码
1、主程序：
将以下程序放在一个模块中
2、工作簿事件程序：
将主程序放在模块1中，并在sheet1（目录）工作簿里面写上本代码，利用call引用主程序，就可以实现实时刷新（意思是每次激活这个目录工作簿，就执行一次更新目录
二、代码说明
1、获取所有工作簿的名称：这里通过for循环，来遍历各个工作簿，然后获取名称，并写入A列，也就是生成目录
2、生成超链接：利用Hyperlinks.Add生成超链接，如果读者不是特别明白，可以先抄写代码进行测试，慢慢就会明白该语句的用法。
3、在新建的页面生成返回按钮：返回目录其实是一个单元格，也就是G1单元格，也是用Hyperlinks.Add生成超链接，指定的是目录页，这样就可以快速返回目录页。
以上就是全部内容，欢迎评论区讨论。
,
