Вызванный объект был отключён от клиентов при запуске макроса

[ser-pan]

Здравствуйте уважаемые форумчане!!!
Помогите решить такую проблему: При запуске нижеуказанного макроса выпадает ошибка которая имеется во вложении. "Вызванный объект отключён от клиентов" При этом на некоторых компьютерах макрос работает отлично, а некоторых пишет такую ошибку... Можно ли избавиться от данной ошибки просто что-нибудь подправив в макросе... Ексель установлен 2003.
Sub printauto()
Dim r, a(), i&
With Sheets("Данные"): a = .UsedRange.Columns(1).Value
For i = 1 To UBound(a)
If a(i, 1) = "x" Then Exit For
Next
If i <= UBound(a) Then .UsedRange.Columns(1).Cells(i).Clea rContents
For Each r In Selection.Rows
If r.Hidden = False Then
.Cells(r.Row, 1) = "x"
Sheets("Конверт").Range("A1:N29").P rintOut Copies:=1, Collate:=True
End If
Next
End With
End Sub

[IgorGO]

"документ слияния" - смычка между word и excel. не требует макросов, умения их писать и понимать что там написано
оформитьть в word шаблон бланка, база в excel у Вас уже есть (удалить только над ней не нужные строки сверху)
связать бланк и базу, вставить в бланк поля базы.

напечатать 10 или 10тыс. конвертов - после настроек, которые у меня бы заняли не белее 10-15 минут, занимает у оператора одно и тоже время )приблизительно 1 минуту). остается только дождаться, когда принтер закончит работу

[ser-pan]

Но как только всё это сделать, я не знаю...

[Hugo121]

Игорь, думаю и для слияния нужно писать макрос. Т.к. там было желание сперва отфильтровать нужные записи, а уж затем печатать только выделенные из отфильтрованного.
Вот этот printauto писал я, а всё остальное уже было, я не стал ломать-переделывать, просто приспособился.

[ser-pan]

Здравствуйте, Hugo!!! На всякий случай и сюда написал... Может и здесь кто подскажет как решить проблему... Как я уже и говорил макрос отличный, но не на всех компах работает...

[Hugo121]

Ну может здесь кто-то попробует, столкнётся с ошибкой и раскусит в чём дело.

[IgorGO]

думаю и для слияния нужно писать макрос

не надо
дополнительное поле в базе, в поле любой признак "печатать / нет"
в документе слияния "слить на принтер, записи содержащие признак ПЕЧАТАТЬ

все это было еще в Word версии 6 году так в 1995.

[Hugo121]

Этот признак вручную ставить будем? Или всёж макросом?
Этот код именно и ставит такой признак. В общем это единственное, что он делает - ставит признак, посылает на печать.

[IgorGO]

Но как только всё это сделать, я не знаю...

напрасно Вы так, сделано для пользователя, ничего особого там нет

Этот признак вручную ставить будем? Или всёж макросом?

а тут вопрос "как распечатать конверты", а не расставлять признаки))) вот на него и отвечал

[ser-pan]

Вот здесь http://www.programmersforum.ru/showthread.php?t=256150 я гляжу тоже подобная ошибка возникала, правда в Word...