PictureFormat.IsEmpty-Eigenschaft (Publisher)
Gibt eine MsoTriState-Konstante zurück, die angibt, ob die angegebene Form ein leerer Bildrahmen ist. Schreibgeschützt.
Syntax
Ausdruck. IsEmpty
Ausdruck Eine Variable, die ein PictureFormat-Objekt darstellt.
Rückgabewert
MsoTriState
Hinweise
Der Wert der IsEmpty -Eigenschaft kann eine der in der Microsoft Office-Typbibliothek deklarierten und in der folgenden Tabelle angezeigten MsoTriState -Konstanten sein.
Konstante | Beschreibung |
---|---|
msoFalse | Die angegebene Form ist kein leerer Grafikrahmen. |
msoTriStateMixed | Gibt eine Kombination von MsoTrue und MsoFalse für den angegebenen Formenbereich an. |
msoTrue | Die angegebene Form ist ein leerer Grafikrahmen. |
Beispiel
Das folgende Beispiel prüft jede Grafik in der aktiven Publikation und druckt ausgewählte Bildeigenschaften für die Grafik, wenn es sich nicht um einen leeren Grafikrahmen handelt.
Dim pgLoop As Page
Dim shpLoop As Shape
For Each pgLoop In ActiveDocument.Pages
For Each shpLoop In pgLoop.Shapes
If shpLoop.Type = pbPicture Or shpLoop.Type = pbLinkedPicture Then
With shpLoop.PictureFormat
If .IsEmpty = msoFalse Then
Debug.Print "File Name: " & .Filename
Debug.Print "Horizontal Scaling: " & .HorizontalScale & "%"
Debug.Print "Vertical Scaling: " & .VerticalScale & "%"
Debug.Print "File size in publication: " & .FileSize & " bytes"
End If
End With
End If
Next shpLoop
Next pgLoop
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.