Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Двухсторонняя печать - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Двухсторонняя печать
A_3485 Дата: Пятница, 17.08.2012, 09:34 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 146
Репутация: 0 ±
Замечаний: 40% ±

2007
Можно ли прописать макрос, чтобы выполнялась двухсоронняя печать Листа?
 
Ответить
СообщениеМожно ли прописать макрос, чтобы выполнялась двухсоронняя печать Листа?

Автор - A_3485
Дата добавления - 17.08.2012 в 09:34
Irysha Дата: Пятница, 17.08.2012, 09:37 | Сообщение № 2
Группа: Пользователи
Ранг: Участник
Сообщений: 68
Репутация: 17 ±
Замечаний: 0% ±

2007,2013
Если у Вас принтер поддерживает дуплексную печать - то для этого макрос и не нужен, а вот если нет - то никакой макрос не поможет, т.к. это технический вопрос
 
Ответить
СообщениеЕсли у Вас принтер поддерживает дуплексную печать - то для этого макрос и не нужен, а вот если нет - то никакой макрос не поможет, т.к. это технический вопрос

Автор - Irysha
Дата добавления - 17.08.2012 в 09:37
A_3485 Дата: Пятница, 17.08.2012, 10:00 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 146
Репутация: 0 ±
Замечаний: 40% ±

2007
Почему макрос не нужен!!!! Было бы очень удобно, по кнопке кликнул и сразу печатаеся вдухсторонняя печать, а не входить в настройки принтера и там ковыряться.
Мой принтер на работе поддерживает двухстороннюю печать, однако при коде:
[vba]
Code
Private Sub CommandButton1_Click()
Sheets("Лист1").PrintOut From:=1, To:=1, Copies:=1,ManualDuplexPrint:=True  
end sub
[/vba]
ничего не работает, и выдает ошибку: Run -time error '1004'.


Сообщение отредактировал A_3485 - Пятница, 17.08.2012, 10:04
 
Ответить
СообщениеПочему макрос не нужен!!!! Было бы очень удобно, по кнопке кликнул и сразу печатаеся вдухсторонняя печать, а не входить в настройки принтера и там ковыряться.
Мой принтер на работе поддерживает двухстороннюю печать, однако при коде:
[vba]
Code
Private Sub CommandButton1_Click()
Sheets("Лист1").PrintOut From:=1, To:=1, Copies:=1,ManualDuplexPrint:=True  
end sub
[/vba]
ничего не работает, и выдает ошибку: Run -time error '1004'.

Автор - A_3485
Дата добавления - 17.08.2012 в 10:00
Формуляр Дата: Пятница, 17.08.2012, 10:16 | Сообщение № 4
Группа: Друзья
Ранг: Ветеран
Сообщений: 832
Репутация: 255 ±
Замечаний: 0% ±

Excel 2003, 2013
A_3485,
в PrintOut() нету настроек принтера.
Откуда вы взяли параметр ManualDuplexPrint - загадка.


Excel 2003 EN, 2013 EN
 
Ответить
СообщениеA_3485,
в PrintOut() нету настроек принтера.
Откуда вы взяли параметр ManualDuplexPrint - загадка.

Автор - Формуляр
Дата добавления - 17.08.2012 в 10:16
Hugo Дата: Пятница, 17.08.2012, 10:17 | Сообщение № 5
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3690
Репутация: 790 ±
Замечаний: 0% ±

365
В 2003 Экселе в help написано так:

PrintOut Method
expression.PrintOut(From, To, Copies, Preview, ActivePrinter, PrintToFile, Collate, PrToFileName)

ManualDuplexPrint нет такого. Это в Ворде есть.


webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
 
Ответить
СообщениеВ 2003 Экселе в help написано так:

PrintOut Method
expression.PrintOut(From, To, Copies, Preview, ActivePrinter, PrintToFile, Collate, PrToFileName)

ManualDuplexPrint нет такого. Это в Ворде есть.

Автор - Hugo
Дата добавления - 17.08.2012 в 10:17
A_3485 Дата: Пятница, 17.08.2012, 10:18 | Сообщение № 6
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 146
Репутация: 0 ±
Замечаний: 40% ±

2007
Почему нет! Если прописать так:
[vba]
Code
Private Sub CommandButton1_Click()
Sheets("Лист1").PrintOut From:=1, To:=1, Copies:=1
end sub
[/vba]
то все отработает.
Я в этом не спец, поэтому и прошу помощи.


Сообщение отредактировал A_3485 - Пятница, 17.08.2012, 10:21
 
Ответить
СообщениеПочему нет! Если прописать так:
[vba]
Code
Private Sub CommandButton1_Click()
Sheets("Лист1").PrintOut From:=1, To:=1, Copies:=1
end sub
[/vba]
то все отработает.
Я в этом не спец, поэтому и прошу помощи.

Автор - A_3485
Дата добавления - 17.08.2012 в 10:18
Serge_007 Дата: Пятница, 17.08.2012, 10:20 | Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (A_3485)
Мой принтер на работе поддерживает двухстороннюю печать, однако при коде:
[vba]
Code
Private Sub CommandButton1_Click()
Sheets("Лист1").PrintOut From:=1, To:=1, Copies:=1,ManualDuplexPrint:=True     
end sub
[/vba]ничего не работает, и выдает ошибку: Run -time error '1004'.

Quote (A_3485)
Если прописать так:
[vba]
Code
Private Sub CommandButton1_Click()
Sheets("Лист1").PrintOut From:=1, To:=1, Copies:=1,ManualDuplexPrint:=True      
end sub
[/vba]то все отработает.


Я чего-то отличий в рабочем и нерабочем кодах не нашел


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (A_3485)
Мой принтер на работе поддерживает двухстороннюю печать, однако при коде:
[vba]
Code
Private Sub CommandButton1_Click()
Sheets("Лист1").PrintOut From:=1, To:=1, Copies:=1,ManualDuplexPrint:=True     
end sub
[/vba]ничего не работает, и выдает ошибку: Run -time error '1004'.

Quote (A_3485)
Если прописать так:
[vba]
Code
Private Sub CommandButton1_Click()
Sheets("Лист1").PrintOut From:=1, To:=1, Copies:=1,ManualDuplexPrint:=True      
end sub
[/vba]то все отработает.


Я чего-то отличий в рабочем и нерабочем кодах не нашел

Автор - Serge_007
Дата добавления - 17.08.2012 в 10:20
A_3485 Дата: Пятница, 17.08.2012, 10:21 | Сообщение № 8
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 146
Репутация: 0 ±
Замечаний: 40% ±

2007
Извиняюсь поправил.
[vba]
Code
Private Sub CommandButton1_Click()
Sheets("Лист1").PrintOut From:=1, To:=1, Copies:=1
end sub
[/vba]


Сообщение отредактировал A_3485 - Пятница, 17.08.2012, 10:24
 
Ответить
СообщениеИзвиняюсь поправил.
[vba]
Code
Private Sub CommandButton1_Click()
Sheets("Лист1").PrintOut From:=1, To:=1, Copies:=1
end sub
[/vba]

Автор - A_3485
Дата добавления - 17.08.2012 в 10:21
Hugo Дата: Пятница, 17.08.2012, 10:23 | Сообщение № 9
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3690
Репутация: 790 ±
Замечаний: 0% ±

365
Потому и нет smile


webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
 
Ответить
СообщениеПотому и нет smile

Автор - Hugo
Дата добавления - 17.08.2012 в 10:23
KuklP Дата: Пятница, 17.08.2012, 10:23 | Сообщение № 10
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация: 486 ±
Замечаний: 0% ±

2003-2010
biggrin Раз работает, значит тему можно закрывать.
Эксел никогда и не работал с драйвером принтера. Он передает задание в диспетчер печати. Ворд работает. Поэтому и с размерами Ворд дружит, а Эксел - нет.


Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728


Сообщение отредактировал KuklP - Пятница, 17.08.2012, 10:26
 
Ответить
Сообщениеbiggrin Раз работает, значит тему можно закрывать.
Эксел никогда и не работал с драйвером принтера. Он передает задание в диспетчер печати. Ворд работает. Поэтому и с размерами Ворд дружит, а Эксел - нет.

Автор - KuklP
Дата добавления - 17.08.2012 в 10:23
A_3485 Дата: Пятница, 17.08.2012, 10:25 | Сообщение № 11
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 146
Репутация: 0 ±
Замечаний: 40% ±

2007
Понимаю что смешно, но как можно решить проблему если изначально принтер может делать двух.печать.
 
Ответить
СообщениеПонимаю что смешно, но как можно решить проблему если изначально принтер может делать двух.печать.

Автор - A_3485
Дата добавления - 17.08.2012 в 10:25
Формуляр Дата: Пятница, 17.08.2012, 10:31 | Сообщение № 12
Группа: Друзья
Ранг: Ветеран
Сообщений: 832
Репутация: 255 ±
Замечаний: 0% ±

Excel 2003, 2013
ИщИте API для обращения к драйверу принтера.
Если конечно для вас это более простая проблема, чем настроить принтер руками. smile


Excel 2003 EN, 2013 EN
 
Ответить
СообщениеИщИте API для обращения к драйверу принтера.
Если конечно для вас это более простая проблема, чем настроить принтер руками. smile

Автор - Формуляр
Дата добавления - 17.08.2012 в 10:31
Michael_S Дата: Пятница, 17.08.2012, 10:53 | Сообщение № 13
Группа: Друзья
Ранг: Старожил
Сообщений: 2012
Репутация: 373 ±
Замечаний: 0% ±

Excel2016
Excel и вручную двустороннюю печать с трудом поддерживает, а вы макросом хотите. В настройках документа установите - двусторонняя печать - и будет вам счастье.
 
Ответить
СообщениеExcel и вручную двустороннюю печать с трудом поддерживает, а вы макросом хотите. В настройках документа установите - двусторонняя печать - и будет вам счастье.

Автор - Michael_S
Дата добавления - 17.08.2012 в 10:53
A_3485 Дата: Пятница, 17.08.2012, 11:28 | Сообщение № 14
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 146
Репутация: 0 ±
Замечаний: 40% ±

2007
Все понял. Спасибо за разъяснения. Тему можно закрывать.
 
Ответить
СообщениеВсе понял. Спасибо за разъяснения. Тему можно закрывать.

Автор - A_3485
Дата добавления - 17.08.2012 в 11:28
Bagir Дата: Пятница, 05.10.2012, 00:45 | Сообщение № 15
Группа: Проверенные
Ранг: Участник
Сообщений: 59
Репутация: 15 ±
Замечаний: 0% ±

Ну прежде всего надо понять, что Офис вообще не работает с двухсторонней печатью. Все это делает драйвер принтера. А из Ексел его можно только вызвать. Что касается переключить руками, так конечно можно, но так зачем же тогда макросы...
Тему давно поднимал тут: http://www.excelworld.ru/forum/2-83-1#27604
Сейчас туда примерчик добавлю. Так есть кое что рабочее, но до полного решения задачи пока не дотягивает.
 
Ответить
СообщениеНу прежде всего надо понять, что Офис вообще не работает с двухсторонней печатью. Все это делает драйвер принтера. А из Ексел его можно только вызвать. Что касается переключить руками, так конечно можно, но так зачем же тогда макросы...
Тему давно поднимал тут: http://www.excelworld.ru/forum/2-83-1#27604
Сейчас туда примерчик добавлю. Так есть кое что рабочее, но до полного решения задачи пока не дотягивает.

Автор - Bagir
Дата добавления - 05.10.2012 в 00:45
Bagir Дата: Среда, 10.10.2012, 00:11 | Сообщение № 16
Группа: Проверенные
Ранг: Участник
Сообщений: 59
Репутация: 15 ±
Замечаний: 0% ±

Обсуждение двухсторонней печати и свойств принтера в целом http://www.excelworld.ru/forum/2-2535-1 Расписано подробно с примером.
И если автор этой ветки не против, и вопрос касался только макроса и двухсторонней печати, то можно закрывать.
 
Ответить
СообщениеОбсуждение двухсторонней печати и свойств принтера в целом http://www.excelworld.ru/forum/2-2535-1 Расписано подробно с примером.
И если автор этой ветки не против, и вопрос касался только макроса и двухсторонней печати, то можно закрывать.

Автор - Bagir
Дата добавления - 10.10.2012 в 00:11
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!