Question

Excel专家 -

我正在处理一个电子表格，其中有多个宏在其中运行并且非常有用，但它确实有一个我希望看到的过程是否可以自动化，到目前为止我的尝试和研究已经到来与纳达一起。

我有一个用户形式直接输入客户端的电子邮件地址到Sheet1的下一行是空的，电子邮件在H2：H3000列。列H已经编程完成了其他几项任务，例如，当电子邮件是活动超链接并且用户选择它时，它会通过Outlook和列K生成电子邮件，只要选择了超链接，它记录了操作的日期和时间，以及执行操作的用户ID。当前设置的主要问题是，用户必须遍历H列中的每个单元格并双击该电子邮件并在其外部单击以激活超链接。有没有办法可以自动化到列H中的任何输入？

谢谢！

Answer 1

如果没有看到您的代码，很难提供更具体的说明，但一个选项可能是将链接添加为超链接而不是直接文本。请参阅下面的示例，如果有帮助请告诉我。

ActiveSheet.Hyperlinks.Add Range("H1"), Me.TextBox1.Value

根据请求，可以在Worksheet模块中使用以下代码在Worksheet_Change事件触发时将文本条目更改为链接。

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("H3:H1500")) Is Nothing Then
        ActiveSheet.Hyperlinks.Add anchor:=Target, Address:=Target.Value
    End If
End Sub

单元格自动将条目格式化为电子邮件超链接

1 个答案: