ShapeRange.Anchor (Word)

Devuelve un objeto Range que representa el intervalo de fijación del intervalo de formas especificado.

Si utiliza esta propiedad en un objeto ShapeRange que contiene más de una forma, se produce un error. Todos los objetos Shape se fijan a un intervalo de texto, pero pueden situarse en cualquier lugar de la página que contiene el delimitador. La forma siempre permanecerá en la misma página que su delimitador.

Dim sre As ShapeRange: Set sre =  
Dim rngAnchor As Range
Set rngAnchor = sre.Anchor