Shape.LockAnchor 属性 (Word)
如果 Shape 对象的锁定标记锁定到锁定范围,则该属性值为 True。 读/写 Long。
语法
expression. LockAnchor
表达式是必需的。 一个代表 Shape 对象的变量。
备注
如果形状有一个锁定的标记,则不能通过拖动来移动形状的锁定标记。 锁定标记不会随形状移动而移动。 虽然 Shape 对象已锁定到某一文字范围,但是您可以将该对象放在页面上的任何位置。 形状锁定到包含锁定范围的第一段的开始。 形状总是与其锁定标记位于同一页。
示例
以下示例新建一个文档,为其添加一个形状,然后锁定形状的锁定标记。
Set myDoc = Documents.Add
Set myShape = myDoc.Shapes.AddShape(msoShapeBalloon, _
100, 100, 140, 70)
myShape.LockAnchor = True
ActiveDocument.ActiveWindow.View.ShowObjectAnchors = True
以下示例返回一条消息,报告活动文档中每个形状的锁定状态。
For x = 1 to ActiveDocument.Shapes.Count
Msgbox "Shape " & x & " is locked - " _
& ActiveDocument.Shapes(x).LockAnchor
Next x
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。