Style.InUse-Eigenschaft (Word)

True, wenn es sich bei der angegebenen Formatvorlage um eine integrierte Formatvorlage handelt, die modifiziert oder im Dokument zugewiesen wurde, oder wenn dies eine neue Formatvorlage ist, die im Dokument erstellt wurde. Schreibgeschützter boolescher Wert.

Syntax

Ausdruck. InUse

Ausdruck Ein Ausdruck, der ein Style-Objekt zurückgibt.

Hinweise

Die InUse-Eigenschaft gibt nicht unbedingt an, ob im Dokument zurzeit Text mit dieser Formatvorlage vorhanden ist. Die InUse-Eigenschaft der Formatvorlage bleibt beispielsweise auf True festgelegt, wenn der Text gelöscht wird, der mit der Formatvorlage formatiert wurde. Bei integrierten Formatvorlagen, die niemals im Dokument verwendet wurden, gibt diese Eigenschaft False zurück.

Beispiel

In diesem Beispiel wird ein Meldungsfeld mit den Namen aller Formatvorlagen angezeigt, die zurzeit im aktiven Dokument verwendet werden.

Dim docActive As Document 
Dim strMessage As String 
Dim styleLoop As Style 
 
Set docActive = ActiveDocument 
 
strMessage = "Styles in use:" & vbCr 
 
For Each styleLoop In docActive.Styles 
 If styleLoop.InUse = True Then 
 With docActive 
 .Content.Find 
 .ClearFormatting 
 .Text = "" 
 .Style = styleLoop 
 .Execute Format:=True 
 If .Found = True Then 
 strMessage = strMessage & styleLoop.Name & vbCr 
 End If 
 End With 
 End If 
Next styleLoop 
 
MsgBox strMessage

Siehe auch

Style-Objekt

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.