excel怎么做目录索引
发布网友
发布时间：2022-02-24 10:49
我来回答
共1个回答
热心网友
时间：2022-02-24 12:18
用事件程序可以
比如你的工作表名为目录其它表为索引页那么在目录工作表下添加事件程序，当激活目录工作表时就为自动建立目录：程序如下：
Private Sub Worksheet_Activate()
Dim sh As Worksheet
For Each sh In Worksheets
If sh.Name <> "目录" Then
n = n + 1
Range("a" & n + 1) = n
Worksheets("目录").Range("b" & n + 1) = sh.Name
Worksheets("目录").Hyperlinks.Add anchor:=Cells(n + 1, 2), Address:="", SubAddress:=sh.Name & "!A1"
End If
Next
End Sub
声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com