Заманал "Type mismatch"

[Gorenkin]

Доброе время суток!..

Уважаемые, честное слово, заманал "Type mismatch" во время обработки приведенного ниже кода:

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

If frmAddDoc.cmbCategory.Text = "Обыкновенные" Then
Set objDoc = objWord.Documents.Add(App.Path & "\" & frmAddDoc.cmbIssuer.Text & "\common.dot")
Else
...аналогичные действия, только с др. шаблоном...
End If

Суть в следующем: при выполнении кода, всякий раз ругается на путь до шаблона (сабж) - хотя при трассировке видно, что путь корректен и шаблон существует.

[alibek]

Как объявлена objDoc?

[Gorenkin]

Вообще, старался делать как положено objDoc заявлена как word.document. Не могу быть уверен, но помойму проблемма не в этом, потому как прописывая путь до шаблона ручками - все работает как часики. Я так думаю, что косяк может быть в том, что я из другой формы вытаскиваю значение text у cомbobox'а? который в свою очередь был заполнен значениями из файла. Хотя повторюсь, что могу ошибаться...

[alibek]

Объяви его как Object. Если заработает, значит в референсах неправильно подключена библиотека Word.

[Gorenkin]

Объяви его как Object. Если заработает, значит в референсах неправильно подключена библиотека Word.

Тада грит, типа "Object required" - я уже проверял...