Word VBA教程:RecipientPostalfromLeft属性

返回或设置一个 Single对象,该对象代表收件人邮政编码距信封左边距的位置(以磅为单位)。用于亚洲语言信封。可读写。

expression.RecipientPostalfromLeft

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

说明

有关在 Microsoft Word 中使用亚洲语言的详细信息,请参阅Word 中关于亚洲语言的功能

VBA示例

本示例检查活动文档是否是邮件合并信封并设为竖排类型,如果是,则设置收件人和发件人的地址信息的位置。


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

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号