Error 462. The Remote server... Помогите!!!

[Alex BeaveRG]

Вот часть кода:

Function WriteRez()
Dim wordApp As Word.Application
Dim wordDoc As Word.Document
Dim sel As Word.Selection
Set wordApp = New Word.Application
wordApp.Documents.Add Template:="РЗУ.dot"
Set wordDoc = wordApp.ActiveDocument
wordDoc.Bookmarks("ТекстовоеПоле1").Select
Set sel = Word.Selection
wordDoc.Application.Selection.Font.Bold = True
If Option1.Value = True Then
sel.TypeText "известному сопротивлению"
Else
sel.TypeText "известной структуре земли"
End If
With wordDoc
.SaveAs Rezultat
.Close
End With
wordApp.Quit
Set wordDoc = Nothing
Set wordApp = Nothing
Set sel = Nothing
End Function

При первом сохранении документа Word - все нормально.
Дальше, если не перезагружать приложение - возникает ошибка:
Error 462. The Remote server machine does not exist or is unavailable
Это при том, что в диспетчере задач WINWORD.EXE исправно исчезает.
Ругается на строку Set sel = Word.Selection
В чем проблема - В книгах не пишут об этом, поискал на разных форумах похожие проблемы - не нашел ответа.
Помогите плиззз...

[GSerg]

На этом форуме приведён полный исчерпывающий ответ на этот вопрос. Он находится по номеру ошибки в поиске. Ссылка на поиск выделена красным и находится вверху страницы. Неиспользование поиска на этом форуме наказывается. Попытайся использовать его сейчас.

[Alex BeaveRG]

Исчерпывающего ответа я там не нашел, а поиском я воспользовался сразу же и только потом написал сообщение.

[GSerg]

http://bbs.vbstreets.ru/viewtopic.php?t ... hlight=462

[Alex BeaveRG]

Спасибо. Поисковик мне этой ссылки не выдал...

[GSerg]

Он находится по номеру ошибки в поиске. Ссылка на поиск выделена красным и находится вверху страницы.

Красным она выделена. А google здесь ни при чём.

[Alex BeaveRG]

а при чем тут гугл?
я про красную кнопку ПОИСК и говорил. Имел в виду местный поисковик! В общем, спасибо, разобрался, проблему устранил!!!

[GSerg]

Местный поисковик эту ссылку даёт.