AccentedLetters Property Example

This example formats the first index in the active document in a single column, with the appropriate letter preceding each alphabetic group and separate headings for accented letters.

If ActiveDocument.Indexes.Count >= 1 Then
    With ActiveDocument.Indexes(1)
        .HeadingSeparator = wdHeadingSeparatorLetter
        .NumberOfColumns = 1
        .AccentedLetters = True
    End With
End If