excel - 在工作表修改上执行 vba 代码

Question

这是我的代码，列出了主工作表中所有工作表的链接：

     For i = 2 To Sheets.Count
          Sheets("main").Hyperlinks.Add Anchor:=Sheets("main").Cells(i, 2),_
          Address:="", SubAddress:="'" & Sheets(i).Name & "'!A1", TextToDisplay:=Sheets(i).Name
     Next i

每次添加新工作表、删除现有工作表、重命名、重新定位时，我都想执行此代码。

我怎样才能做到这一点？

附言

如果有更好的解决方案我也会考虑。

Answer 1

我会将代码放在工作表“Main”的 Worksheet_Activate 块中。这样，每次激活工作表时都会更新超链接。