Partilhar via

Método Shapes.AddPicture (Word)

Adiciona uma figura a um documento. Retorna um objeto Shape que representa a imagem e a adiciona à coleção Shapes .

Sintaxe

expressão. AddPicture (FileName, LinkToFile, SaveWithDocument, Left, Top, Width, Height, Anchor)

expressão Obrigatório. Uma variável que representa um objeto Shapes .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
FileName Obrigatório String O caminho e o nome do arquivo de figura.
LinkToFile Opcional Variant True para vincular a imagem ao arquivo do qual ele foi criado. False para tornar a imagem uma cópia independente do arquivo. O valor padrão é False.
SaveWithDocument Opcional Variant True para salvar a imagem vinculada com o documento. O valor padrão é False.
Left Opcional Variant A posição (em pontos) da borda esquerda da nova figura relativa à âncora.
Top Opcional Variant A posição, medida em pontos, da borda superior da nova figura relativa à âncora.
Width Opcional Variant A largura da figura, em pontos.
Height Opcional Variant A altura da figura, em pontos.
Âncora Opcional Range Um Intervalo no documento.

Valor de retorno

Forma

Exemplo

Este exemplo adiciona uma figura a uma tela de desenho recém-criada no documento ativo.

Sub NewCanvasPicture() 
 Dim shpCanvas As Shape 
 
 'Add a drawing canvas to the active document 
 Set shpCanvas = ActiveDocument.Shapes _ 
 .AddCanvas(Left:=100, Top:=75, _ 
 Width:=200, Height:=300) 
 
 'Add a graphic to the drawing canvas 
 shpCanvas.CanvasItems.AddPicture _ 
 FileName:="C:\Program Files\Microsoft Office\" & _ 
 "Office\Bitmaps\Styles\stone.bmp", _ 
 LinkToFile:=False, SaveWithDocument:=True 
End Sub

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