Свойство Document.FooterLeft (Visio)
Возвращает или задает текстовую строку, которая отображается в левой части нижнего колонтитула документа. Для чтения и записи.
Синтаксис
expression. FooterLeft
Выражение Переменная, представляющая объект Document .
Возвращаемое значение
String
Замечания
Это значение также можно задать в поле Слева в разделе Нижний колонтитул в диалоговом окне Колонтитулы (откройте вкладку Файл , нажмите кнопку Печать, нажмите кнопку Предварительный просмотр, а затем в группе Предварительный просмотр щелкните Колонтитул & нижний колонтитул).
Строка, возвращаемая FooterLeft , и строка, для которой задан FooterLeft , могут содержать escape-коды, представляющие данные. Эти escape-коды можно объединить с другим текстом.
Ниже приведен список допустимых escape-кодов для нижних колонтитулов и заголовков документов.
Управляющий код | Описание |
---|---|
&p | Номер страницы |
&t или &T | Текущее время |
&d (краткая версия) или &D (длинная версия) | Текущая дата |
&& | Амперсанд |
&e | Расширение имени файла |
&f | Имя файла |
&f&e | Имя и расширение файла |
&n | Имя страницы |
&P | Всего печатных страниц |
Пример
В следующем макросе показано, как поместить строку, содержащую текущую дату, в левую часть нижнего колонтитула документа. После выполнения этого макроса, если дата — 4 мая 2007 г., левая часть нижнего колонтитула содержит сообщение "Дата — четверг, 4 мая 2007 г.".
Sub FooterLeft_Example()
Dim strFooter as String
'Build the footer string.
strFooter = "The date is " & "&D"
'Set the footer of the current document.
ThisDocument.FooterLeft = strFooter
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.