Word VBA教程:DefaultWidth属性

返回或设置默认信封宽度(以磅为单位)。Single 类型,可读写。

注意   如果设置了 DefaultHeight 或 DefaultWidth属性,则“工具”菜单的“信封选项”对话框中的信封尺寸将自动更改为自定义尺寸。用DefaultSize属性可将预定义尺寸设置为默认尺寸。

VBA示例

本示例设置自定义信封默认宽度和高度,并将一个信封添至活动文档。


Dim strAddress As String
Dim strReturn As String
strAddress = "Tim O' Brien " & vbCr & "123 Skye St." _
    & vbCr & "Bellevue, WA  98004"
strReturn = "Dave Edson" & vbCr & "123 West Main" _
    & vbCr & "Seattle, WA  98004"
With ActiveDocument.Envelope
    .DefaultWidth = InchesToPoints(9)
    .DefaultHeight = InchesToPoints(3.85)
End With
ActiveDocument.Envelope.Insert _
    Address:=strAddress, ReturnAddress:=strReturn

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号