共用方式為


ShapeRange.SaveAsPicture 方法 (Publisher)

會將一個或多個圖形的範圍另存成圖片檔。

語法

運算式SaveAsPicture (FileNamepbResolution)

表達 代表 ShapeRange 物件的 變數。

參數

名稱 必要/選用 資料類型 描述
FileName 必要 字串 您想要建立之新圖片檔的路徑和檔案名。 圖片儲存所在的圖形格式取決於副檔名 (,例如您指定的.jpg或.gif) 。
pbResolution 選用 PbPictureResolution 您要在儲存圖片時使用的解析度。 可以為其中一個 PbPictureResolution 常數。

範例

下列 Microsoft Visual Basic for Applications (VBA) 巨集會示範如何使用 SaveAsPicture 方法儲存成.jpg 圖片檔案使用中出版物第一頁上的所有圖案。

執行此程式碼之前,請將 取代 filename.jpg 為您電腦上具有儲存檔案許可權之資料夾的有效檔案名和路徑。

Public Sub SaveAsPicture_Example() 
 
 Dim pubShapeRange As Publisher.ShapeRange 
 Set pubShapeRange = ThisDocument.Pages(1).Shapes.Range 
 
 pubShapeRange.SaveAsPicture "filename.jpg" 
 
End Sub

支援和意見反應

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