Index.HeadingSeparator (Word)
Retorna ou define o texto entre grupos alfabéticos entradas que começam com a mesma letra no índice. Corresponde à opção \h de um campo INDEX. Leitura/gravação WdHeadingSeparator. Os valores de retorno possíveis são wdHeadingSeparatorBlankLine - Uma linha em branco, wdHeadingSeparatorLetter - Uma letra designada, wdHeadingSeparatorLetterFull - Uma letra maiúscula designada, wdHeadingSeparatorLetterLow - Uma letra minúscula designada, wdHeadingSeparatorNone - Sem separador.
If ActiveDocument.Indexes.Count >= 1 Then
With ActiveDocument.Indexes(1)
.HeadingSeparator = wdHeadingSeparatorLetter
.NumberOfColumns = 1
End With
End If