Compartilhar via

Objeto Formas (Publisher)

Uma coleção de objetos Shape que representam todas as formas em uma página de uma publicação. Cada objeto Shape representa um objeto na camada de desenho, como uma AutoForma, uma forma livre, um objeto OLE ou uma imagem.

Observação

Se quiser trabalhar com um subconjunto das formas num documento ( por exemplo, para fazer algo apenas para as formas automáticas no documento ou apenas para as formas selecionadas), tem de construir uma coleção ShapeRange que contenha as formas com as quais pretende trabalhar.

Comentários

Utilize a propriedade Page.Shapes para devolver a coleção Formas . Utilize Formas (índice), em que o índice é o número do índice, para devolver um único objeto Forma .

Observação

Se quiser fazer algo (como eliminar ou definir uma propriedade) para todas as formas numa publicação ao mesmo tempo, utilize o método Range para criar um objeto ShapeRange que contenha todas as formas na coleção Formas e, em seguida, aplique a propriedade ou método adequado ao objeto ShapeRange .

Utilize um dos seguintes métodos da coleção Formas para adicionar uma forma a uma publicação e devolver um objeto Forma que representa a forma recentemente criada:

Exemplo

O exemplo a seguir seleciona todas as formas na primeira página da publicação ativa.

Sub SelectAllShapes() 
    ActiveDocument.Pages(1).Shapes.SelectAll 
End Sub

O exemplo a seguir adiciona uma nova forma à publicação ativa.

Sub AddNewShape() 
    ActiveDocument.Pages(1).Shapes.AddShape Type:=msoShapeFoldedCorner, _ 
        Left:=50, Top:=50, Width:=100, Height:=200 
End Sub

O exemplo a seguir inverte horizontalmente a forma um na primeira página da publicação ativa.

Sub FlipShape() 
    ActiveDocument.Pages(1).Shapes(1).Flip FlipCmd:=msoFlipHorizontal 
End Sub

Métodos

Propriedades

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? 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.

  • Last updated on