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

Question

Excel专家-

我正在处理一个包含多个宏运行的电子表格，它非常有用，但它确实有一个过程，我想看看是否可以自动化，到目前为止我的尝试和研究提出了 nada。

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

谢谢！

Answer 1

如果没有看到您的代码，很难给出更具体的说明，但一种选择可能是将 link 添加为 Hyperlink 而不是纯文本。请参阅下面的示例，如果有帮助请告诉我。

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

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

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

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

Cells to automatically format entries as email hyperlinks

excel

automation

vba

hyperlink