Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Настройка верхних колонтитулов для печати.
Синтаксис
выражение.
FilePageSetupHeader( _Name_, _Alignment_, _Text_ )
выражение: переменная, представляющая объект Application.
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| Name | Необязательно заполнять. | String | Имя представления или отчета, для которого нужно настроить колонтитулы для печати. |
| Alignment | Необязательный | Long | Выравнивание текста в верхнем колонтитуле. Может быть одной из следующих констант PjAlignment : pjLeft, pjCenter или pjRight. Значение по умолчанию — pjCenter. |
| Text | Необязательный | String | Текст, отображаемый в верхнем колонтитуле. В состав заголовка могут быть включены следующие специальные коды форматов: |
| Код формата | Описание |
|---|---|
| &Б | Включение или отключение полужирной печати. |
| &I | Включение или отключение курсивной печати. |
| &U | Включение и выключение печати подчеркивания. |
| &""fontname"" | Печатает знаки с кодом формата указанным шрифтом. В качестве примера можно привести &""Arial"". |
| &nn | Печатает знаки с кодом формата указанным размером шрифта. Чтобы указать размер в пунктах, используйте двузначное число. Примером может служить &08. |
| &P""путь"" | Вставляет указанное изображение. В качестве примера можно привести команду &P"" [Мои документы] \Image.gif"". Термин [Мои документы] обозначает полный путь к папке "Мои документы". |
| &[Дата] | Печатает текущую системную дату. |
| &[Время] | Печатает текущее системное время. |
| &[Файл] | Печатает имя файла. |
| &[Страница] | Печать номера страницы. |
| &[Страницы] | Печатает общее количество страниц в документе. |
| &[Название проекта] | Печатает название. |
| &[Компания] | Печатает название компании. |
| &[Управляющий] | Печатает имя руководителя. |
| &[Дата начала] | Печатает дату начала проекта. |
| &[Дата окончания] | Печать даты окончания проекта. |
| &[Текущая дата] | Печать текущей даты проекта. |
| &[Дата статуса] | Печать даты отчета о состоянии проекта. |
| &[Вид] | Печатает имя представления. |
| &[Отчет] | Печатает имя отчета. |
| &[Фильтр] | Печатает имя фильтра. |
| &[Сохраненная дата] | Печатает последнюю сохраненную дату. |
| &[Тема] | Печатает тему. |
| &[Автор] | Печатает автора. |
| &[ключевое слово] | Выводит ключевые слова. |
| &[ Field_Name ] | Печатает значение поля, указанного с помощью Field_Name. Если макрос будет выполняться на нескольких языках, в поле, указанном с Field_Name , должно использоваться локализованное для каждого языка имя. В качестве примера можно привести &[Фактические затраты]. |
Возвращаемое значение
Boolean
Примечания
При использовании метода FilePageSetupHeader без указания аргументов открывается диалоговое окно "Параметры страницы " с выбранной вкладкой "Верхний колонтитул ".
Пример
В приведенном ниже примере настраивается верхний колонтитул для печати.
Sub SetLegend()
Dim strLegend As String
strLegend = GetFontFormatCode("Arial")
strLegend = strLegend & "&BThis text will appear in the legend.&B"
Application.FilePageSetupLegend Text:=strLegend, _
Alignment:=pjCenter, LegendOn:=pjOnEveryPage
End Sub
Public Function GetFontFormatCode(strFontName As String) As String
GetFontFormatCode = "&" & Chr(34) & strFontName & Chr(34)
End Function
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.