Копировальные работы
VetCAD

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

    0 оценок

LGers

размещено: 14 Декабря 2006
обновлено: 26 Февраля 2007
VBA. Печать нескольких листов одновременно из пространства модели

Макрос печати из ModelSpace нескольких листов сразу. См. краткое описание Plot.txt в архиве.
В ModelSpece отрисованы границы листов. Выбираем несколько границ отправляем несколько листов сразу. Есть автоматический
поворот страниц.
Есть сортировка по листам (номера листов занесены в осн.надпись(таблицу))

Состав архива
-краткое описание
-тестовый файл
-макрос plot.dvb

Комментарии

Комментарии могут оставлять только зарегистрированные участники
Авторизоваться
Комментарии 1-10 из 37
Askerovich , 14 декабря 2006 в 18:42
#1
Особо умиляет первая фраза справочного файла
"Данный макрос Вы используете на свой страх и риск. Мы не несем никакой ответственности за последствия использования программного обеспечения, а также любые действия, повлекшие за собой потерю каких-либо данных...
Мало того, что сделали не очень нужную вещь, поскольку печать из пространства модели в автокаде, уже не раз здесь заклеймили, но еще и предупредили, что можно потерять данные. Ну уж нет, спасибо большое, мы как нибудь по старинке, из постранства листа печатать будем.
, 14 декабря 2006 в 22:01
#2
а я, наборот, уже не раз сталкивался с зависаниями при печати из пространства листа, когда лист задан не стандартный. поэтому предпочитаю печатать из пространства модели и с этим у меня ещё никогда не было проблем! поэтому скачаю и опробую макрос. идея очень хорошая, особенно для того чтобы создавать многостраничный DWF из пространства модели.
AndreO , 15 декабря 2006 в 00:17
#3
Да согласен с lenivec ... зависание были и другие фишки... так что всё же модель рулит и идея неплохая
alex182 , 15 декабря 2006 в 12:16
#4
Что-то в названии написано из листа.... в описании из модели...
Как оно есть на самом деле-то?
LGers , 15 декабря 2006 в 12:55
#5
Добавлена проверка на наличие принтера прописанного в параметрах печати.
, 18 декабря 2006 в 22:20
#6
Попробовал и понял, что многостраничный DWF из пространства модели пока остается в мечтах. Жаль, что размер листа задаётся только один для всех рамок и не воспринимаются нестандартные (пользовательские размеры) листа, а только те что прописаны в драйверах принтера. В частности, для сохраненных .pc3-конфигураций.
, 25 декабря 2006 в 15:06
#7
lenivec, Давай ко мне в Асю 112121624 или по почте lgers@mail.ru

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

поясните кто знает в чём тут проблема
, 22 января 2007 в 15:13
#9
достаточно рамку выделить слоя format, и все печатает.
, 12 марта 2007 в 16:56
#10
ВВ
Есть небольшой глюк. Если указываешь в номерах столбца или строки не тот номер, т.е. если в ссылаться на ячейку не с номером, а с текстом, то и выдает такой глюк.

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

0.15 МБ

plastfoil