У Барбары есть рабочий лист, который ей нужно периодически распечатывать.

Иногда ей нужно напечатать только три столбца данных, а иногда ей нужно напечатать больше. Когда она печатает только три столбца, они очень хорошо помещаются на странице, напечатанной в портретной ориентации. Когда она печатает больше столбцов, ей нужно печатать в альбомной ориентации. Барбара интересуется, есть ли способ настроить Excel, чтобы он автоматически переключался с книжной на альбомную в зависимости от количества столбцов, которые она хочет напечатать.

Возможно, самый простой способ справиться с этим типом печати — это добавить небольшой макрос, который запускается непосредственно перед печатью. Если область печати настроена таким образом, что она содержит 1, 2 или 3 столбца, то распечатка выполняется в книжной ориентации. Используется любое другое количество столбцов и альбомная ориентация. Вот макрос; вы должны добавить его в модуль ThisWorkbook:

Private Sub Workbook_BeforePrint(Cancel As Boolean)

With ActiveSheet.PageSetup         If Range(.PrintArea).Columns.Count > 3 Then             .Orientation = xlLandscape         Else             .Orientation = xlPortrait         End If     End With End Sub

Конечно, это может быть более выгодным (и гибким), если вы просто используете функцию пользовательских представлений в Excel. Вы можете указать представление, которое включает ваши три столбца или любое количество столбцов, которое вы хотите. Вы даже можете включить в представление параметры печати, чтобы ориентация страницы была включена в представление. Выполните следующие действия, чтобы настроить представления:

  1. Отформатируйте и разместите свой лист так, как хотите. Также убедитесь, что вы установили как область печати для трех столбцов, так и макет страницы в книжную ориентацию.

  2. Выберите Custom Views из меню View. Excel отображает диалоговое окно «Пользовательские представления».

  3. Щелкните по кнопке Добавить. Excel отображает диалоговое окно «Добавить представление». (См. Рис. 1.)

  4. В поле Имя укажите имя, которое вы хотите связать с этим представлением.

  5. В разделе «Просмотр включает» выберите параметры, которые отражают то, что вы хотите сохранить в этом представлении. Убедитесь, что вы указали, что хотите включить параметры печати.

  6. Когда вы будете удовлетворены своими настройками, нажмите кнопку ОК. Текущее представление сохраняется в Excel.

  7. Повторите шаги с 1 по 6, но на этот раз для большей области печати, убедившись, что вы установили макет страницы для альбомной ориентации.

Теперь, когда вы хотите напечатать разными способами, вы просто вызываете нужный вид и выбираете печать — все остальное уже настроено для вас.

_Примечание: _

Если вы хотите узнать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах ExcelTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

ExcelTips — ваш источник экономичного обучения Microsoft Excel.

Этот совет (10364) применим к Microsoft Excel 97, 2000, 2002 и 2003.

Вы можете найти версию этого совета для ленточного интерфейса Excel (Excel 2007 и новее) здесь:

link: / excelribbon-Automatic_Selection_of_Portrait_or_Landscape [Автоматический выбор портретной или альбомной ориентации].