Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Formatvorlagen löschen in Word
Autor: Hulan
Datum: 29.10.03 15:27
HALLO, Der Code löscht die nicht benutzte FV, aber leider setzt, Fußnotentext in "Standard" Kann mir jemand bessere Vorschlag machen? Danke voraus Sub DeleteUnusedStylesinDoc() 'Nicht verwendete Formatvorlagen löschen '(Integrierte Formatvorlagen können nicht gelöscht werden.) Dim sty As Style On Error Resume Next '<- w i c h t i g For Each sty In ActiveDocument.Styles If sty.InUse = True Then With ActiveDocument.Range.Find .ClearFormatting .Style = sty.NameLocal If .Execute(FindText:="", Format:=True, _ Wrap:=wdFindStop) = False Then sty.Delete End If End With End If Next End Sub

Formatvorlagen löschen in Word

762

Hulan

29.10.03 15:27

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen