更改Excel中多个工作表上显示的公式

我有一个Excel文件，大约有100张表格，都包含相同的“主”按钮。此按钮（实际上是一个超链接）链接到Excel文件的主工作表。单击按钮时，将打开主工作表并选择单元格A1。问题是单元格A1和A2包含图像，当选择A1时，该选择部分位于图像的“顶部”。就功能而言，这不是问题，但从光学角度看，它并不好看。这就引出了以下问题：

• 是否有方法使超链接选择，例如A1到F61
• 如果是这样，是否有办法将其自动应用于每个工作表按钮上的“主”按钮
• 点击你的形状（按钮）
• 选择超链接
• 在左侧，选择“放置在此文档中”
• 键入参考：Main！F61

---

您试图实现的解决方案非常简单。只需遵循以下步骤
• 打开要链接到的工作表（“主工作表”）
• 选择要超链接到的单元格范围
• 在“名称”框（显示单元格地址的左上角）中，尝试写入一个单词或任意字符 命名，然后按Enter键
• 选择按钮（设计模式），转到“插入”选项卡，单击超链接或链接（取决于office版本）按钮
• 在对话框中，在“链接到”中选择“本文档中的位置”，然后在“定义名称”组中，您将看到您为范围指定的单词或名称
• 选择该选项，然后单击OK按钮
完成

---

希望这有帮助
那么，您已经知道如何更改一个链接了。要全部更改，可以使用以下宏：
• 迭代所有工作表
• 迭代工作表中的所有形状
• 检查链接是否是要更改的链接，然后
• 改变它
例如：

Sub ChangeHyperlinks()
    Dim w As Worksheet, s As Shape, h As Hyperlink
    For Each w In ActiveWorkbook.Worksheets
        For Each s In w.Shapes
            Set h = Nothing
            On Error Resume Next
            Set h = s.Hyperlink
            On Error GoTo 0
            If Not h Is Nothing Then
                If h.Address = "" And h.SubAddress = "Your_Main_Worksheet_Name!A5:B6" Then
                    h.SubAddress = "Your_Main_Worksheet_Name!A1:F61"
                End If
            End If
        Next
    Next
End Sub

---

“按钮”是指具有关联超链接的形状？确切地说。我的想法是这样的：在每个工作表上找到特定的超链接->将每个工作表上的内容更改为新的超链接。你有什么代码可以发布吗？谢谢。对于每个工作表上的特定超链接，是否有任何方法可以不手动执行此操作？