Index.HeadingSeparator (Word)
Gibt den Text zwischen alphabetischen Gruppen (Einträgen, die mit demselben Buchstaben anfangen) im Index zurück oder legt ihn fest. Mögliche Rückgabewerte sind wdHeadingSeparatorBlankLine - Leere Zeile, wdHeadingSeparatorLetter - Definierter Buchstabe, wdHeadingSeparatorLetterFull - Definierter Großbuchstabe, wdHeadingSeparatorLetterLow - Definierter Kleinbuchstabe, wdHeadingSeparatorNone - Kein Trennzeichen.
If ActiveDocument.Indexes.Count >= 1 Then
With ActiveDocument.Indexes(1)
.HeadingSeparator = wdHeadingSeparatorLetter
.NumberOfColumns = 1
End With
End If