Word VBA教程:GetPoint方法

返回指定区域或图形的屏幕坐标。

expression.GetPoint(ScreenPixelsLeft, ScreenPixelsTop, ScreenPixelsWidth, ScreenPixelsHeight, obj)

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

ScreenPixelsLeft   Long 类型,必需。需要 Microsoft Word 为对象的左边界值返回的变量名。

ScreenPixelsTop   Long 类型,必需。需要 Microsoft Word 为对象的顶部边界值返回的变量名。

ScreenPixelsWidth   Long 类型,必需。需要 Microsoft Word 为对象的宽度返回的变量名。

ScreenPixelsHeight   Long 类型,必需。需要 Microsoft Word 为对象的高度值返回的变量名。

obj   Object 类型,必需。Range 或 Shape对象。

说明

如果在屏幕上看不到整个区域或图形,则导致出错。

VBA示例

本示例检查当前选定对象并返回其屏幕坐标。


Dim pLeft As Long
Dim pTop As Long
Dim pWidth As Long
Dim pHeight As Long
ActiveWindow.GetPoint pLeft, pTop, pWidth, pHeight, _
    Selection.Range
MsgBox "Left = " & pLeft & vbLf _
    & "Top = " & pTop & vbLf _
    & "Width = " & pWidth & vbLf _
    & "Height = " & pHeight

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号