ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Печать документов, при помощи 2-х принтеров
2 сообщений из 2, страница 1 из 1
Печать документов, при помощи 2-х принтеров
    #36508171
Andrey0071
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Andrey0071
Гость
Для печать документов в Excel2003, используется два принтера, лазерный и матричный, задействуются при нажатии кнопок на странице. Подскажите какой умный макрос прописать на кнопке, чтобы при нажатии на одну кнопку использовался принтер по умолчанию, при нажатии на другую, матричный принтер.
...
Рейтинг: 0 / 0
09.03.2010, 09:28
| Ответить | Цитировать | Написать  
Печать документов, при помощи 2-х принтеров
    #36508201
Сергей06
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сергей06
Участник
Andrey0071,
Сервис - макрос - записать макрос
Печать - выбрать принтер - ок.
Должно получится что-то в этом роде:


Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Sub Макрос3()

    Range("F2:F7").Select
    Application.ActivePrinter = "\\adf\HP LaserJet 2200 Series PCL (Ne07:)"
    Application.ActivePrinter = "PDF-XChange for ABBYY PDF Transformer 2.0 (Ne00:)"
    Application.ActivePrinter = "\\adf\HP Photosmart 2600 series (Ne03:)"
    Application.ActivePrinter = "\\adf\HP LaserJet 2200 Series PCL (Ne07:)"
    ActiveWindow.SelectedSheets.PrintOut Copies:= 1 , ActivePrinter:= _
        "\\adf\HP LaserJet 2200 Series PCL (Ne07:)", Collate:=True
End Sub
...
Рейтинг: 0 / 0
09.03.2010, 09:48
| Ответить | Цитировать | Написать  
2 сообщений из 2, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Печать документов, при помощи 2-х принтеров
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=36508201&tid=2178394]:
 0ms
get settings:
 9ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 172ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 49ms
get tp. blocked users:
 1ms
others: 226ms
total:  490ms
созд. / загр.: 490ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]