返回或设置指定超链接主题行的文本字符串。 读/写 String。
语法
表达式。EmailSubject
表达 一个代表“Hyperlink”对象的变量。
备注
主题行追加到超链接的 Internet 地址或 URL。 此属性通常用于电子邮件超链接。 此属性的值优先于同一 Hyperlink 对象的 Address 属性中指定的任何电子邮件主题。
示例
本示例检查活动文档是否存在电子邮件超链接;如果找到任何具有空白主题行,则添加主题“NewProducts”。
Dim hypLoop As Hyperlink
For Each hypLoop In ActiveDocument.Hyperlinks
If hypLoop.Address Like "mailto*" And _
hypLoop.Address = hypLoop.EmailSubject Then
hypLoop.EmailSubject = "NewProducts"
End If
Next hypLoop
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。