Freigeben über

ShapeRange.SaveAsPicture-Methode (Publisher)

  • Artikel

Speichert einen Bereich einer oder mehrerer Formen als Grafikdatei.

Syntax

Ausdruck. SaveAsPicture (FileName, pbResolution)

Ausdruck Eine Variable, die ein ShapeRange-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
FileName Erforderlich String Der Pfad und Dateiname der neuen Bilddatei, die Sie erstellen möchten. Das Grafikformat, in dem das Bild gespeichert wird, wird durch die von Ihnen angegebene Dateinamenerweiterung (z. B. .jpg oder .gif) bestimmt.
pbResolution Optional PbPictureResolution Die Auflösung, in der die Grafik gespeichert werden soll. Dies kann eine der PbPictureResolution-Konstanten sein.

Beispiel

Der folgende Microsoft Visual Basic für Applikationen (VBA)-Makro veranschaulicht, wie mit der SaveAsPicture -Methode alle Formen auf der ersten Seite der aktiven Publikation als JPG-Grafikdatei speichern.

Ersetzen filename.jpg Sie vor dem Ausführen dieses Codes durch einen gültigen Dateinamen und den Pfad zu einem Ordner auf Ihrem Computer, in dem Sie über die Berechtigung zum Speichern von Dateien verfügen.

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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.