Runtime error 13 при создании объекта автоматизации в WinME

[Blob]

Написал на VB программку, создающую объект Word.Application. Код такой:

Код: Выделить всё

Sub tralala()
     Dim objWord As Word.Application
     Set objWord = CreateObject("Word.Application")
End Sub

На компьютерах с Win2000 и Word2000 всё работает ОК при наличии в программе ссылки на Microsoft Word 9.0 Object Library. А в WindowsME rus c установленным Office2000 на строке Set... выдаёт "Run time error 13 "Type mismatch"". В чём дело?

[GSerg]

Потому что это Me

Объяви переменную как object...

[Blob]

Спасибо, работает