将Outlook电子邮件中的超链接添加到打开Excel电子表格时的行号

Question

我有一个使用VBA发送电子邮件的Excel电子表格：

Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)

strbody = "This is email text, click the link <a href='C:\test.xlsm & Range("F" & ActiveCell.Row).Address'></a>"

On Error Resume Next

With OutMail
    .To = "####"
    .CC = ""
    .BCC = ""
    .Subject = "Sales Tracker: A New Task has been added to the tracker"
    .HTMLBody = strbody & strbody2 & strbody3 & strbody4
    .Send 'displays outlook email
    'Application.SendKeys "%s" 'presses send as a send key
End With
On Error GoTo 0

Set OutMail = Nothing
Set OutApp = Nothing 

[电子邮件是在用户单击活动行中的特定单元格时发送的。

我在带有超链接的电子邮件中包括Excel电子表格。

现在我要添加到超链接以包括用户单击的行的单元格引用。

这个想法是当单击超链接时，将打开电子表格，并将用户带到链接所引用的行并突出显示它。

Answer 1

您在链接中缺少工作表的引用（即使我不确定是否足够），因此请尝试执行以下操作：

Answer 2

我不确定是否可以通过超链接来实现，很可能不会。我唯一想到的就是将Worksheet_Activate（）事件添加到您要附加的电子表格中，并指向您希望的范围，但没有超链接。