ShapeRange.Anchor (Word)

Retorna um objeto Range que representa o intervalo de ancoragem do intervalo de formas especificado. Somente leitura.

Se você usar essa propriedade em um objeto ShapeRange que contenha mais de uma forma, ocorrerá um erro. Todos os objetos Shape são ancorados a um intervalo de texto, mas podem ser posicionados em qualquer lugar na página que contém a âncora. Se você especificar o intervalo de ancoragem quando você cria uma forma, a âncora será posicionada no início do primeiro parágrafo que contém o intervalo de ancoragem. Se você não especificar o intervalo de ancoragem, o intervalo de ancoragem é selecionado automaticamente e a forma é posicionada em relação às bordas superior e esquerdas da página. A forma sempre permanecerá na mesma página que sua âncora. Se a propriedade LockAnchor da forma estiver definida como True, você não poderá arrastar a âncora de sua posição na página.

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