Paragraph.IsStyleSeparator (Word)

True, wenn ein Absatz eine besondere ausgeblendete Absatzmarke enthält, die es Microsoft Word erlaubt, Absätze zusammenzuführen, die mit verschiedenen Formatvorlagen formatiert sind.


Sub StyleSep() 
 Dim pghDoc As Paragraph 
 For Each pghDoc In ActiveDocument.Paragraphs 
 If pghDoc.IsStyleSeparator = True Then 
 pghDoc.Range.Select 
 Selection.Style = "Normal" 
 End If 
 Next pghDoc 
End Sub