如果为 True,则锁定指定框架的位置。框架锁定位置表明框架显示在普通视图中的位置。不能重新放置一个位置已锁定的框架的锁定标记。Boolean 类型,可读写。
expression.LockAnchor
expression 必需。该表达式返回一个 Frame 对象。
应用于 Shape 和 ShapeRange 对象的 LockAnchor 属性。
如果为 True,则指定的 Shape 或 ShapeRange 对象的锁定标记锁定于锁定区域内。当图形有一个已锁定的锁定标记时,不能通过拖动来移动图形的锁定标记(当图形移动时,锁定标记不移动)。Long 类型,可读写。
expression.LockAnchor
expression 必需。该表达式返回以上一个对象。
虽然 Shape 对象已锁定于某一区域的文字中,但是可将该对象放在页面任何位置。图形锁定于包含锁定区域第一段的段首。图形只能与其锁定标记位于同一页内。
本示例锁定活动文档第二节第一个框架的锁定标记。
Set myRange = ActiveDocument.Sections(2).Range
If TypeName(myRange) <> "Nothing" And myRange.Frames.Count > 0 Then
myRange.Frames(1).LockAnchor = True
End If
本示例新建一篇文档,为其添加一个图形,然后锁定图形的锁定标记。
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