выбрать лист vba excel



Автор Ѝлли задал вопрос в разделе Программное обеспечение

Вопрос о печати в Excel 2010 и получил лучший ответ

Ответ от Алексей Матевосов (AlexM)[гуру]
Скорее всего причина в количестве информации на листе. Когда печатали из Экселя 2003 лист книги помещался на страницу, а сейчас, в Экселе 2010 информации на листе больше чем может поместится на нее.
Если информация на листах примерно одинаковая, то можно подогнать области печати, чтобы лист помещался на страницу. В Экселе 2003 это делается через Разметка страницы в меню Вид. Или выделив таблицу на листе задать "Область печати" в меню Файл
Алексей Матевосов (AlexM)
Просветленный
(25463)
Теперь понятно. Надо распечатать по одной страничке с каждого выделенного листа книги.
К сожалению мой Excel 2003 такого делать не умеет.
Но задачу можно решить простым макросом
Код
Sub Макрос()
For Each wks In ActiveWindow.SelectedSheets
wks.PrintOut From:=1, To:=1, Copies:=1, Collate:=True
Next
End Sub
Как вставить: Alt+F11, Insert - Module. Создасться Module1. В него вставить код
From:=1 с какой страницы
To:=1 по какую страницу
Copies:=1 количество копий
Значения можно править как надо.
Закрыть окно проекта VBA
Выделить листы, удерживая Ctrl или Shift, Alt+F8, выбрать "Макрос", нажать выполнить.
Ожидайте окончание печати.
Имя "Макрос" можно поменять на подходящее для печати. Макросу можно назначить горячие клавиши.

Ответ от Виталий Гогуев[гуру]
Просто укажи номера страниц, там есть такая опция.

Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: Вопрос о печати в Excel 2010

Лист диалога и свойства кнопки в VBA (excel 2007)
Когда Вы вставляете в книгу «Окно диалога Excel 5.0»
(например, щёлкнув правой кнопкой мыши на
подробнее...

Поиск по именам вкладок в Excel?
Когда стопиццот листов, то переход от одного листа к другому можно сделать так. Кликнуть правой
подробнее...

Что такое Макросы и что нужно сделать, чтобы с документом Excel работать?
Работа с макросами

Макрос — это программа, автоматизирующая выполнение различных часто
подробнее...
 

Ответить на вопрос:

Имя*

E-mail:*

Текст ответа:*
Проверочный код(введите 22):*