Excel 自动根据Sheet名生成目录

如下方法转载自网络，以便你们共享 网络 打开你要建立，目录的表格按Alt+F11在谈出的对话框中点插入选择模块而后把下面的代码复制到模块中ui Sub mulu()     On Error GoTo Tuichu     Dim i As Integer     Dim ShtCount As Integer     Dim SelectionCell As Rangeit     ShtCou

>>阅读原文<<