☰

Excel 2010 VBA 将活动单元格超链接到自身，这样当该单元格被粘贴并发送到 Outlook 电子邮件中时，它将指向其准确位置

tag-icon • tag-icon microsoft-outlook microsoft-excel-2010 vba hyperlink
Excel 2010 VBA 将活动单元格超链接到自身，这样当该单元格被粘贴并发送到 Outlook 电子邮件中时，它将指向其准确位置

目标：Excel 2010 - VBA 将活动单元格超链接到其自身，因此当该单元格被粘贴并发送到 Outlook 电子邮件中时，它将指向其在电子表格上的确切位置。我需要保持 Excel 单元格的内容完整 - 继续显示其中与超链接等无关的内容。该单元格将通过电子邮件发送。需要能够单击 Outlook 电子邮件消息中的单元格，并让该超链接打开电子表格并选择该电子表格上的确切单元格位置。唯一缺少的元素是超链接部分。下面的 VBA 代码使超链接部分出现错误（黄色突出显示）。如果我没有按照规则粘贴代码，请见谅 - 我可能不理解它们。谢谢帮助！

Sub H_Link_Cell_to_Self
Dim path As String
Dim sheet As String
Dim cell As String
path = Application.ActiveWorkbook.FullName
sheet = Application.ActiveSheet.Name
cell = Application.ActiveCell.Address
ActiveSheet.Hyperlinks.Add Range(Active.Cell), "path” & “\“ & “sheet” & “\“ & “cell"
End Sub

答案1

您的代码看起来不错，除了添加超链接的那一行。在这里，您的变量被双引号括起来，这导致它们被解释为文字值而不是变量。

尝试一下这个：

ActiveSheet.Hyperlinks.Add Range(Active.Cell), path & “\“ & sheet & “\“ & cell

相关内容