Propriedade Document. Shapes (Word)Document.Shapes property (Word)

Retorna uma coleção Shapes que representa todos os objetos Shape no documento especificado.Returns a Shapes collection that represents all the Shape objects in the specified document. Somente leitura.Read-only.

SintaxeSyntax

expressão. Formasexpression.Shapes

expressão Uma variável que representa um objeto Document .expression A variable that represents a Document object.

ComentáriosRemarks

Essa coleção pode conter desenhos, formas, figuras, objetos OLE, controles ActiveX, objetos de texto e textos explicativos.This collection can contain drawings, shapes, pictures, OLE objects, ActiveX controls, text objects, and callouts. Para obter informações sobre como retornar um único membro de uma coleção, consulte retornando um objeto de uma coleção.For information about returning a single member of a collection, see Returning an object from a collection.

A propriedade Shapes, quando aplicada a um documento, retorna todos os objetos Shape no texto principal do documento, excluindo os cabeçalhos e rodapés.The Shapes property, when applied to a document, returns all the Shape objects in the main story of the document, excluding the headers and footers.

ExemploExample

Este exemplo cria um novo documento, adiciona a ele um retângulo com 100 pontos de largura e 50 pontos de altura e define o canto superior esquerdo do retângulo como estando a 5 pontos da borda esquerda e a 25 pontos do canto superior esquerdo da página.This example creates a new document, adds a rectangle to it that's 100 points wide and 50 points high, and sets the upper-left corner of the rectangle to be 5 points from the left edge and 25 points from the upper-left corner of the page.

Set myDoc = Documents.Add 
myDoc.Shapes.AddShape msoShapeRectangle, 5, 25, 100, 50

Este exemplo define a textura de preenchimento de todas as formas do documento ativo.This example sets the fill texture for all the shapes in the active document.

For Each s in ActiveDocument.Shapes 
 s.Fill.PresetTextured msoTextureOak 
Next s

Este exemplo adiciona uma sombra à primeira forma do documento ativo.This example adds a shadow to the first shape in the active document.

Set myShape = ActiveDocument.Shapes(1) 
myShape.Shadow.Type = msoShadow6

Confira tambémSee also

Objeto DocumentDocument Object

Suporte e comentáriosSupport and feedback

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação?Have questions or feedback about Office VBA or this documentation? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.