该属性返回或设置用于传送文档的邮件的主题文本(用于 RoutingSlip 对象)或“英文信函向导”创建的信函的主题文本(用于 LetterContent 对象)。String 类型,可读写。
expression.Subject
expression 必需。该表达式返回“应用于”列表中的一个对象。
本示例为 Month End.doc 的传送名单设置主题和消息文字。
If Documents("Month End.doc").HasRoutingSlip = True Then
With Documents("Month End.doc").RoutingSlip
.Subject = "End of month report"
.Message = "I need your response on this."
End With
End If
本示例显示“英文信函向导”创建的信函的主题,除非该主题为空字符串。
If ActiveDocument.GetLetterContent.Subject <> "" Then
MsgBox ActiveDocument.GetLetterContent.Subject
End If