我有一个Excel文件,大约有100张纸,每个纸都包含相同的“主”按钮。此按钮(实际上是超链接)链接到Excel文件的主工作表。单击按钮时,将打开主工作表并选择单元格A1。问题在于单元格A1和A2包含图像,并且当选择A1时,此选择部分在图像的“顶部”。从功能上讲,这不是问题,但从外观上看并不太好。这使我想到以下问题:
答案 0 :(得分:1)
因此,您已经知道如何更改一个链接。要更改所有内容,您可以使用以下宏:
如下所示:
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
答案 1 :(得分:0)
答案 2 :(得分:0)
您要实现的解决方案非常简单。只需按照以下步骤
完成...
希望这会有所帮助!