Inserir entrada do índice na posição específica

Question

Selection.TypeText ("(" & Abbreviation & " placeholder )")

IndexEntryRange = ActiveDocument.Indexes.MarkEntry(Range:=Selection.Range, Entry:=Abbreviation, CrossReference:=Definition, CrossReferenceAutoText:="", BookmarkName:="", Bold:=False, Italic:=False)

É possível inserir IndexEntryRange na placeholder posição?

    

Answer 1

Se eu entendi corretamente o código que você postou, pode ser mais fácil inserir o índice diretamente na posição, em vez de substituir o texto do espaço reservado.

Selection.TypeText ("(" & Abbreviation)
IndexEntryRange = ActiveDocument.Indexes.MarkEntry(Range:=Selection.Range, Entry:=Abbreviation, CrossReference:=Definition, CrossReferenceAutoText:="", BookmarkName:="", Bold:=False, Italic:=False)

Selection.MoveEnd
Selection.MoveRight
Selection.TypeText (" )")