ShowObjectAnchors Property Example
This example adds a frame around the selection, switches the active window to print layout view, and shows object anchors for framed objects.
Selection.Frames.Add(Range:=Selection.Range).LockAnchor = True
With ActiveDocument.ActiveWindow.View
.Type = wdPrintView
.ShowObjectAnchors = True
End With