Shapes.AddPicture 方法 (Publisher)

將代表圖片的新 Shape 物件新增至指定 的 Shapes 集合。

語法

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

expression 代表 Shapes 物件的變數。

參數

名稱	必要/選用	資料類型	描述
FileName	必要	String	要插入圖案中之圖片檔的名稱。 路徑可以是絕對或相對路徑。
LinkToFile	必要	MsoTriState	決定圖片是否要連結或內嵌至出版物。
SaveWithDocument	必要	MsoTriState	決定圖片是否和出版物存成不同的檔案。
Left	必要	Variant	代表圖片之圖案的左邊緣位置。
Top	必要	Variant	代表圖片之圖案的上緣位置。
Width	選用	Variant	代表圖片之圖案的寬度。 預設值是 -1，也就是說，圖案的寬度會根據物件資料自動設定。
Height	選用	Variant	代表圖片之圖案的高度。 預設值為 -1，表示圖形的高度會根據物件的資料自動設定。

傳回值

圖形

註解

如果 SaveWithDocument 引數是 msoTrue，Microsoft Publisher 會將 FileName 引數所指定的圖片檔另存一份在出版物所在的相同目錄中。

LinkToFile和SaveWithDocument引數不能有相同的值，否則會發生錯誤。 如果任一引數是 msoTrue ，其他必須是 msoFalse 。

對於 Left、 Top、 Width和 Height 引數，數值會以 點為單位進行評估;字串可以是 Publisher (支援的任何單位，例如「2.5 in」) 。

LinkToFile參數可以是 Microsoft Office 類型程式庫中所宣告的MsoTriState常數之一，如下表所示。

常數	描述
msoFalse	圖片內嵌至出版物。
msoTrue	圖片連結至出版物。

範例

下列範例會將以現有檔案為基礎的圖片新增至使用中出版物;出版物中的圖片會連結至原始檔案的複本。 請注意， PathToFile 必須以有效的檔案路徑取代 ，此範例才能運作。

Dim shpPicture As Shape 
 
Set shpPicture = ActiveDocument.Pages(1).Shapes.AddPicture _ 
 (FileName:="PathToFile", _ 
 LinkToFile:=msoTrue, _ 
 SaveWithDocument:=msoFalse 
 Left:=72, Top:=72)

支援和意見反應

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