Shapes.AddPicture 方法 (Word)

會將圖片新增至文件。 會傳回代表圖片的 Shape 物件，並將其新增至 Shapes 集合。

語法

運算式。AddPicture (FileName、 LinkToFile、 SaveWithDocument、 Left、 Top、 Width、 Height、 Anchor)

需要 expression。 代表 Shapes 物件的 變數。

參數

名稱	必要/選用	資料類型	描述
FileName	必要	String	圖片的路徑及檔案名稱。
LinkToFile	選用	Variant	True 是表示 將圖片連結到已建立的檔案。 False 將圖片建立成獨立的檔案複本。 預設值為 False 。
SaveWithDocument	選用	Variant	True 是表示 將連結的圖片儲存與文件。 預設值為 False 。
Left	選用	Variant	相對於繪圖畫布的新圖片之左邊界的位置 (以點為測量單位)。
Top	選用	Variant	相對於繪圖畫布的新圖片之上邊界的位置 (以點為測量單位)。
Width	選用	Variant	圖片的寬度 (以點為單位)。
Height	選用	Variant	圖片的高度 (以點為單位)。
Anchor	選用	Range	檔中的 Range。

傳回值

圖形

範例

本範例會將圖片新增至使用中文件新建立的繪圖畫布中。

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

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。