Word VBA教程:Resize方法

调整 Word 应用程序或某一任务的窗口大小。如果该窗口被最大化或最小化,将导致出错。

注意   使用WidthHeight属性可分别设置窗口的宽度和高度。

expression.Resize(Width, Height)

expression   必需。表达式返回一个 Application 或 Task对象。

Width   Long 类型,必需。表示窗口的宽度,以磅值为单位。

Height   Long 类型,必需。表示窗口的高度,以磅值为单位。

VBA示例

本示例将 Microsoft Excel 应用程序窗口调整为 6 英寸宽、4 英寸高。


If Tasks.Exists("Microsoft Excel") = True Then
    With Tasks("Microsoft Excel")
        .WindowState = wdWindowStateNormal
        .Resize Width:=InchesToPoints(6), Height:=InchesToPoints(4)
    End With
End If

本示例将 Word 应用程序窗口调整为 7 英寸宽、6 英寸高。


With Application
    .WindowState = wdWindowStateNormal
    .Resize Width:=InchesToPoints(7), Height:=InchesToPoints(6)
End With

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号