Ориентация листа при печати формы в Excel - Microsoft Office Excel

VictorM · 19.07.2012, 10:39

Здравствуйте, уважаемые!
Собственно вопрос в названии темы.
Строка UserForm1.PrintForm выводит на печать форму, а вот как изменить ориентацию на альбомную?
Методы работающие со страницей тут не подходят.
Может кто сталкивался.
Смотрел по форуму, в инете, что-то ничего путного не нашлось.

Казанский · 19.07.2012, 10:53

гуглится на раз

http://social.msdn.microsoft.com/For...1-ab37bd449264

VictorM · 19.07.2012, 12:54

Цитата:

гуглится на раз

Значит не так гуглил)
Спасибо, буду разбираться

VictorM · 19.07.2012, 13:39

Что-то не то...
По предложенное Вами ссылке взял код, но на строке

Код:

ActiveSheet.PasteSpecial Format:="Bitmap", Link:=False, _
        DisplayAsIcon:=False

редактор останавливается и пишет что метод PasteSpecial завершен неверно.
Хотя, если остановить выполнение макроса и нажать кнопочку "Вставить" на панели инструментов, картинка вставляется во вновь созданную, новую книгу..
Подскажите, пожалуйста, что тут не так
Не могу разобраться

VictorM · 19.07.2012, 13:59

Оставил только

Код:

ActiveSheet.Paste

Все сработало.
Еще раз спасибо!

19.07.2012, 10:39	#1
VictorM Старожил Регистрация: 15.05.2008 Сообщений: 2,058	Ориентация листа при печати формы в Excel Здравствуйте, уважаемые! Собственно вопрос в названии темы. Строка UserForm1.PrintForm выводит на печать форму, а вот как изменить ориентацию на альбомную? Методы работающие со страницей тут не подходят. Может кто сталкивался. Смотрел по форуму, в инете, что-то ничего путного не нашлось. "Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь" "Большое спасибо" - Z261597841314, R208907249777, U447361470499

19.07.2012, 10:53	#2
Казанский Старожил Регистрация: 31.12.2010 Сообщений: 2,133	гуглится на раз http://social.msdn.microsoft.com/For...1-ab37bd449264 exceleved@yandex.ru Яндекс.Деньги: 410011500007619

19.07.2012, 13:39	#4
VictorM Старожил Регистрация: 15.05.2008 Сообщений: 2,058	Что-то не то... По предложенное Вами ссылке взял код, но на строке Код: `ActiveSheet.PasteSpecial Format:="Bitmap", Link:=False, _ DisplayAsIcon:=False` редактор останавливается и пишет что метод PasteSpecial завершен неверно. Хотя, если остановить выполнение макроса и нажать кнопочку "Вставить" на панели инструментов, картинка вставляется во вновь созданную, новую книгу.. Подскажите, пожалуйста, что тут не так Не могу разобраться "Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь" "Большое спасибо" - Z261597841314, R208907249777, U447361470499 Последний раз редактировалось VictorM; 19.07.2012 в 13:54.

19.07.2012, 13:59	#5
VictorM Старожил Регистрация: 15.05.2008 Сообщений: 2,058	Оставил только Код: `ActiveSheet.Paste` Все сработало. Еще раз спасибо! "Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь" "Большое спасибо" - Z261597841314, R208907249777, U447361470499

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
при печати листа не печатать расположенные на ней кнопки ActiveX	roborrr	Microsoft Office Excel	2	27.10.2011 12:00
Треугольники при печати из Excel 2010	New_Angel	Microsoft Office Excel	2	21.06.2011 16:08
Отображается сетка таблицы Excel при печати.	Алена-2009	Microsoft Office Word	1	07.07.2010 23:12
Проблема в Excel при копировании листа	kirill55	Помощь студентам	0	06.11.2009 23:15
Удалить строку листа Excel при выполнении условия	Gennady	Microsoft Office Excel	14	18.12.2007 13:54