[gil]

Ps. I see that I have clear all twice in the post although not in real life.
Gil
"gil" wrote in message ...
Hi All,



My Word2003 code for adding spelling dictionaries does not seem to work in Word2007. How can I fix it?



ActiveDocument.ShowGrammaticalErrors = True

ActiveDocument.ShowSpellingErrors = True

Languages(wdEnglishUS).SpellingDictionaryType = wdSpelling

With CustomDictionaries

.ClearAll

With .Add(ActiveDocument.AttachedTemplate.Path & "\Custom201a.dic")

.LanguageSpecific = True

' .LanguageID = wdEnglishUS

End With

With CustomDictionaries

.ClearAll

With .Add(ActiveDocument.AttachedTemplate.Path & "\Custom201c.dic")

.LanguageSpecific = True

' .LanguageID = wdEnglishUS

End With

End With



I wish to keep my custom dictionaries in the same folder as the attached template. It facilitates mobile use from one computer to another. I am currently using Office Home and Student altho I will be getting the professional version in the near future.



tia,

Gil