Word) (Shape.LockAnchor 屬性

如果 Shape 物件的定位點鎖定在錨定範圍，則為 True。 讀取/寫入的 Long。

語法

expression. LockAnchor

需要 expression。 代表 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

另請參閱

Shape 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。