Forum: Algorithmen, Datenstrukturen und Klassendesign
by p80286,
22. Okt 2010
Hier das Makro mit dem Word sucht:
Selection.Find.ClearFormatting
Selection.Find.Style = ActiveDocument.Styles("Überschrift 1")
Selection.Find.ParagraphFormat.Borders.Shadow = False
With Selection.Find
.Text = ""
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
Forum: Algorithmen, Datenstrukturen und Klassendesign
by p80286,
22. Okt 2010
Die Frage ist, was Du unter "Überschrift" verstehst. Für Word gibt es keine "Überschriften" sondern nur Text, der bestimmte Eigenschaften hat. (Font.....)
Gruß
K-H