VBA. Печать нескольких листов одновременно из пространства модели

Особо умиляет первая фраза справочного файла
"Данный макрос Вы используете на свой страх и риск. Мы не несем никакой ответственности за последствия использования программного обеспечения, а также любые действия, повлекшие за собой потерю каких-либо данных...
Мало того, что сделали не очень нужную вещь, поскольку печать из пространства модели в автокаде, уже не раз здесь заклеймили, но еще и предупредили, что можно потерять данные. Ну уж нет, спасибо большое, мы как нибудь по старинке, из постранства листа печатать будем.

а я, наборот, уже не раз сталкивался с зависаниями при печати из пространства листа, когда лист задан не стандартный. поэтому предпочитаю печатать из пространства модели и с этим у меня ещё никогда не было проблем! поэтому скачаю и опробую макрос. идея очень хорошая, особенно для того чтобы создавать многостраничный DWF из пространства модели.

Да согласен с lenivec ... зависание были и другие фишки... так что всё же модель рулит и идея неплохая

Что-то в названии написано из листа.... в описании из модели...
Как оно есть на самом деле-то?

Добавлена проверка на наличие принтера прописанного в параметрах печати.

Попробовал и понял, что многостраничный DWF из пространства модели пока остается в мечтах. Жаль, что размер листа задаётся только один для всех рамок и не воспринимаются нестандартные (пользовательские размеры) листа, а только те что прописаны в драйверах принтера. В частности, для сохраненных .pc3-конфигураций.

lenivec, Давай ко мне в Асю 112121624 или по почте lgers@mail.ru

Есть пару вопросов.

макрос с номерами страниц не работает ((
выдаёт ошибку
run-time error'13':
type mismatch
дебагер пальцем указывает на строчку
C2 = CLng(TablesArray(K).GetText(CLng(.TextBox12.Value) - 1, CLng(.TextBox13.Value) - 1))

поясните кто знает в чём тут проблема

достаточно рамку выделить слоя format, и все печатает.

ВВ
Есть небольшой глюк. Если указываешь в номерах столбца или строки не тот номер, т.е. если в ссылаться на ячейку не с номером, а с текстом, то и выдает такой глюк.

Тестовый файл был заменен на "правильный" - вернее с ним по умолчанию все работает. В старом номер столбца надо было указывать 12.(т.к. там несколько столбцов объединены).