Classe Rectangles (Word VBA)

Uma coleção de objetos Rectangle em uma página que representa partes de texto e gráficos. Use a coleção Rectangles e objetos relacionados e propriedades para definir programaticamente o layout de página em um documento. Para usar uma variável de classe Rectangles, ela primeiro precisa ser instanciada por exemplo

For Each

Aqui está um exemplo de processamento dos itens Rectangles em uma coleção.

Dim lin As Line: Set lin = 
Dim shp As Rectangle
For Each shp In lin.Rectangles
	With shp
		
	End With
Next shp

Count

Retorna um Long que representa o número de retângulos na coleção. Somente leitura.

Dim rcts As Rectangles: Set rcts =  
Dim lngCount As Long
lngCount = rcts.Count

Item

Retorna um objeto Rectangle individual em uma coleção.

Item (Index)

Index: O objeto individual a ser retornado. Pode ser um Long que indica a posição ordinal do objeto individual.

Dim rcts As Rectangles: Set rcts =  
Dim shp As Rectangle
Set shp = rcts(Index:=1)