| |
|
| |
| Название |
Получение списка системных принтеров в VBA. |
| Автор |
LonerWanderer |
| Размер |
1 кб |
| Дата |
8/10/2007 9:40:57 PM |
| Описание |
Как известно, в VBA нет объекта Printer и, соответственно, нельзя получить список системных принтеров - только текущий для данного приложения. Данный код позволяет получить список системных принтеров и установить нужный по шаблону (например "LaserJet", "Sharp", "A3", "A1"). Работает в Excel 2000 и выше. Скорее всего (лично не проверял) с небольшой доработкой будет работать и в Word/Access. Код взят отсюда: http://groups.google.com/group/microsoft.public.excel.programming/browse_frm/thread/231202176dfdcd34/dcf9983cd07f97c6?lnk=st&q=list+printers+group%3A*Excel*+author%3Akeepitcool&rnum=6 и подвергнут небольшой корректировке. |
| Кол-во загрузок: |
5251 |
Скачать
|
|
| |
|
|
|
|