如何使用代码实现目录自动更新的呢？

爱你所选0922

WPS工作簿里面有很多的工作表（包含目录表格），我想在目录表格中添加其他表格的超链接，以便能快速实现链接到我想要的表格，我试过WPS的“创建表格目录”功能，发现有几个缺陷，所以想请教下各位大佬能否帮忙写个代码以解决它的这个缺陷。（返回按钮统一在其他表格的$A$1”位置）
缺陷一：当我修改工作表名称时（1改成11），目录上的超链接名称“1”没有更改过来，导致超链接失效
缺陷二：当我新建一个工作表4时，目录上并没有这个工作表4的超链接
缺陷三：当我移动工作表2.3的顺序时，目录上的超链接顺序并没有跟着做对应的改变


之前我在其他网站也了解到了一个“自动更新目录”表格。他基本是满足我上面的需求，唯一不能满足的点是“返回目录的单元格不是在$A$1”
所以我想了解他的代码以便做出修改。

3190496160

Private Sub Worksheet_Activate()
Call 生成目录
End Sub
Private Sub Worksheet_SelectionChange(ByVal T As Range)
If T.Row > 1 And T.Column = 1 Then
    If T.Count > 1 Then End
    If T.Value = "" Then End
    Sheets(T.Value & "").Select
End If
End Sub

3190496160

WPS目录.rar (17.53 KB, 下载次数: 1)

2024-5-18 10:36 上传

点击文件名下载附件

爱你所选0922

3190496160 发表于 2024-5-18 10:35
Private Sub Worksheet_Activate()
Call 生成目录
End Sub

感谢您的回复，不过我试了下不行，不知道是哪里出错了，还恳请大佬帮忙回复解答下，谢谢！
步骤如下：
按在快捷键alt+F11——插入——模块——粘贴您的代码——按F5运行——弹出命名“宏名称”——随便输入个名称——创建——接着再按F5,依然没有任何改变的呢？

爱你所选0922

3190496160 发表于 2024-5-18 10:36

感谢您这么好，还直接把弄好的都发出来了，不过我使用了下，我添加新的表格时是有更新，可是在新的表格上没有返回按钮