返回或设置一个 Single 对象,该对象代表收件人邮政编码距信封左边距的位置(以磅为单位)。用于亚洲语言信封。可读写。
expression.RecipientPostalfromLeft
expression 必需。该表达式返回一个 Envelope 对象。
有关在 Microsoft Word 中使用亚洲语言的详细信息,请参阅 Word 中关于亚洲语言的功能。
本示例检查活动文档是否是邮件合并信封并设为竖排类型,如果是,则设置收件人和发件人的地址信息的位置。
Sub NewEnvelopeMerge()
With ActiveDocument
If .MailMerge.MainDocumentType = wdEnvelopes Then
With ActiveDocument.Envelope
If .Vertical = True Then
.RecipientNamefromLeft = InchesToPoints(2.5)
.RecipientNamefromTop = InchesToPoints(2)
.RecipientPostalfromLeft = InchesToPoints(1.5)
.RecipientPostalfromTop = InchesToPoints(0.5)
.SenderNamefromLeft = InchesToPoints(0.5)
.SenderNamefromTop = InchesToPoints(2)
.SenderPostalfromLeft = InchesToPoints(0.5)
.SenderPostalfromTop = InchesToPoints(3)
End If
End With
End If
End With
End Sub