CanvasShapes.Range (Word)

Retorna um objeto ShapeRange.

Os valores de posição de caractere começam com 0 (zero) no início do documento. Todos os caracteres são contados, incluindo os não imprimíveis. Os caracteres ocultos são contados mesmo quando não são exibidos. Objetos ShapeRange não incluem objetos InlineShape. Um objeto InlineShape é equivalente a um caractere e é posicionado como um caractere dentro de um intervalo de texto. Objetos Shape ficam vinculados a um intervalo de texto (a seleção, por padrão), mas pode ser posicionados em qualquer lugar na página. Um objeto Shape sempre aparecerá na mesma página que o intervalo ao que qual está ancorado. A maioria das operações que você pode fazer com que um objeto Shape você também pode fazer com um objeto ShapeRange que contém uma única forma. Algumas operações, quando executadas em um objeto ShapeRange que contém várias formas, gerar um erro.

Range (Index)

Index: Especifica quais formas devem ser incluídas no intervalo especificado. Pode ser um número inteiro que especifica o número de índice de uma forma dentro da coleção Shapes, uma cadeia de caracteres que especifica o nome de uma forma ou uma matriz que contém inteiros ou seqüências.

Sub CanvasShapeRange() 
 Dim rngCanvasShapes As Range 
 Set rngCanvasShapes = ActiveDocument.Shapes(1).CanvasItems.Range(1) 
 rngCanvasShapes.Select 
 rngCanvasShapes.Delete 
End Sub