实际工作簿中工作表的超链接答案

【问题标题】：Hyperlink to Worksheet in actual Workbook实际工作簿中工作表的超链接
【发布时间】：2011-06-16 18:03:02
【问题描述】：

如何将超链接添加到特定单元格并将其寻址到 Excel 文件中的工作表？

这是我已经得到的：

Cells(zeile, 1).Select
Worksheets(1).Hyperlinks.Add Anchor:=Selection, Address:=Workbooks(1).Worksheets(fortnr), SubAddress:=Cells(1, 1).Address

谢谢。

【问题讨论】：

【解决方案1】：

ActiveSheet.Hyperlinks.Add ActiveCell, "", Sheets(fortnr).Name & "!A1"

地址应为空白，子地址应采用 Sheet1!A1 格式。这会在活动单元格中放置一个链接，假设您有一个名为 fortnr 的变量，该变量包含同一工作簿中的有效工作表名称。

如果你想指向不同工作簿中的单元格，那么除了地址必须是那个文件之外，一切都是一样的。

ActiveSheet.Hyperlinks.Add ActiveCell, Workbooks(1).FullName, Sheets(fortnr).Name & "!A1"

假设 Workbooks(1) 是一个不同的文件，并且之前已保存，并且有一个具有正确名称等的工作表。

【讨论】：

好的，但是如果我先打开一个不同的 excel 文件，它会尝试将超链接链接到该文件。是否可以始终将其链接到活动工作簿？ excel文件的名称会发生很大变化，因此文件名上没有引用。提前致谢

【解决方案2】：

想法 1：为当前活动单元格添加超链接

假设要链接的工作表名称是“VBA1”

ActiveSheet.Hyperlinks.Add Activecell, "", "VBA1!A1"

想法 2：向名为“CallButton”的形状添加超链接

ActiveSheet.Hyperlinks.Add ActiveSheet.Shapes("CallButton"), "", "VBA1!A1"

【讨论】：

【解决方案3】：

如果您尝试通过 UI 执行此操作：

链接将添加到您的电子表格中。

【讨论】：