电脑教程
位置:首页>> 电脑教程>> office教程>> Excel利用VBA批量添加邮件链接

Excel利用VBA批量添加邮件链接

  发布时间:2022-05-02 10:10:24 

标签:Excel,利用,VBA,批量,添加,邮件,链接,如果,Excel

如果Excel表格中的某个区域有许多文本格式的邮件地址需要添加链接,用手工的方式非常繁琐。可以使用下面的VBA代码来快速添加链接,假设该区域为F2:F18。

Sub ConvertToEmail()
Dim convertRng As Range
Set convertRng = Range("F2:F18")
Dim rng As Range
For Each rng In convertRng
If rng.Value <> "" Then
ActiveSheet.Hyperlinks.Add rng, "mailto:" & rng.Value
End If
Next rng
End Sub

 

0
投稿

猜你喜欢

手机版 电脑教程 asp之家 www.aspxhome.com