Question

全部显示

应用于 Frame 对象的 LockAnchor 属性。

如果为 True，则锁定指定框架的位置。框架锁定位置表明框架显示在普通视图中的位置。不能重新放置一个位置已锁定的框架的锁定标记。Boolean 类型，可读写。

expression.LockAnchor

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

应用于 Shape 和 ShapeRange 对象的 LockAnchor 属性。

如果为 True，则指定的 Shape 或 ShapeRange 对象的锁定标记锁定于锁定区域内。当图形有一个已锁定的锁定标记时，不能通过拖动来移动图形的锁定标记（当图形移动时，锁定标记不移动）。Long 类型，可读写。

expression.LockAnchor

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

说明

虽然 Shape 对象已锁定于某一区域的文字中，但是可将该对象放在页面任何位置。图形锁定于包含锁定区域第一段的段首。图形只能与其锁定标记位于同一页内。

示例

当应用于 Frame 对象时。

本示例锁定活动文档第二节第一个框架的锁定标记。

Set myRange = ActiveDocument.Sections(2).Range
If TypeName(myRange) <> "Nothing" And myRange.Frames.Count > 0 Then
 myRange.Frames(1).LockAnchor = True
End If

当应用于 Shape 和 ShapeRange 对象时。

本示例新建一篇文档，为其添加一个图形，然后锁定图形的锁定标记。

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