Freigeben über


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.