AutoTextEntries

[balachandar]

Hi All,
I wanted to add many entries to the Autotext values in Word
2000. Since the number of values are more, I just wrote a macro to achive this. Though the value gets added to the AutoTextEntries field and preview is also available. But
AutoTextEntry tool tip does not appear as I type. Making the whole thing useless. But Strangely I observed if I add
value one by one , Then AutoText tool tip appears.

Application.DisplayAutoCompleteTips is also set to true.

This is the code in the Macro

ActiveDocument.AttachedTemplate.AutoTextEntries.Add Name:="A1000", Range:=Selection.Range
ActiveDocument.AttachedTemplate.AutoTextEntries("A1000&quot.Value = "A1000_TABLE_CLERK"
Application.DisplayAutoCompleteTips = True
ActiveDocument.AttachedTemplate.AutoTextEntries.Add Name:="A1001", Range:=Selection.Range
ActiveDocument.AttachedTemplate.AutoTextEntries("A1001&quot.Value = "A1001_TABLE_CLERK"
Application.DisplayAutoCompleteTips = True
ActiveDocument.AttachedTemplate.AutoTextEntries.Add Name:="A1000", Range:=Selection.Range
ActiveDocument.AttachedTemplate.AutoTextEntries("A1002&quot.Value = "A1002_TABLE_CLERK"
Application.DisplayAutoCompleteTips = True

and another such 161 Items.

Please do help me to find out what goes wrong?. Is there any other way to add entries to AutotextEntries?. Or Can We
Implement a "Intellisense " Kind of feature in some other way?.

Thanks and Regards
Balachandar Ganesan.