返回介绍

ReturnAddress 属性

发布于 2019-09-29 10:17:17 字数 1731 浏览 868 评论 0 收藏 0

全部显示

应用于 Envelope 对象的 ReturnAddress 属性。

返回一个 Range 对象,该对象代表信封上的寄信人地址。

expression.ReturnAddress

expression 必需。该表达式返回一个 Envelope 对象。

说明

如果在为文档添加信封之前使用该属性,则会产生错误。

应用于 LetterContent 对象的 ReturnAddress 属性。

返回或设置由“英文信函向导”创建的信件的寄信人地址。String 类型,可读写。

expression.ReturnAddress

expression 必需。该表达式返回一个 LetterContent 对象。

示例

当应用于 Envelope 对象时。

如果为活动文档添加了一个信封,则本示例显示其寄信人地址,否则,将显示一个消息框。

On Error GoTo errhandler
addr = ActiveDocument.Envelope.ReturnAddress.Text
MsgBox Prompt:=addr, Title:="Return Address"
errhandler:
If Err = 5852 Then MsgBox _
 "The active document doesn't include an envelope"

当应用于 LetterContent 对象时。

本示例创建新的 LetterContent 对象,设置寄信人地址和其他一些属性,然后用 RunLetterWizard 方法运行“英文信函向导”。

Dim oLC as New LetterContent
With oLC
 .LetterStyle = wdFullBlock
 .Salutation ="Hello"
 .SalutationType = wdSalutationOther
 .ReturnAddress = Application.UserAddress
End With
Documents.Add.RunLetterWizard LetterContent:=oLC

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。
列表为空,暂无数据
    我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
    原文