Método CanvasShapes.AddPicture (Word)

Adiciona uma figura a uma tela de desenho. Retorna um objeto Shape que representa a imagem e o adiciona à coleção CanvasShapes.

Sintaxe

expression. AddPicture( _FileName_ , _LinkToFile_ , _SaveWithDocument_ , _Left_ , _Top_ , _Width_ , _Height_ )

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

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.

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

Confira também

Coleção CanvasShapes

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.