Word VBA教程:EmailSubject属性

返回或设置指定的超链接主题行的文本字符串。该主题行附加在超链接的 Internet 地址或 URL 中。String 类型,可读写。

说明

此属性通常配合电子邮件超链接一起使用。其值优先于在相同 Hyperlink对象的Address属性中指定的任何其他电子邮件主题。

VBA示例

本示例实现的功能是:检查活动文档中的电子邮件超链接。如果发现某个超链接有空主题行,则为其添加主题“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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号