Поделиться через


Свойство Document.HeaderFooterFont (Visio)

Указывает шрифт, используемый для текста верхнего и нижнего колонтитулов. Для чтения и записи.

Синтаксис

expression. HeaderFooterFont

Выражение Переменная, представляющая объект Document .

Возвращаемое значение

IFontDisp

Замечания

COM предоставляет стандартную реализацию объекта шрифта с интерфейсом IFontDisp поверх базовой системной поддержки шрифтов. Интерфейс IFontDisp предоставляет свойства объекта шрифта и реализуется в библиотеке типов stdole в виде объекта StdFont , который можно создать в Microsoft Visual Basic. На библиотеку типов stdole автоматически ссылаются все проекты Visual Basic для приложений (VBA) в Microsoft Visio.

Чтобы получить сведения об объекте StdFont , поддерживающем интерфейс IFontDisp , выполните следующие действия.

  1. В группе Код на вкладке Разработчик щелкните Visual Basic.

  2. В меню Вид выберите пункт Обозреватель объектов.

  3. В списке Проект или библиотека щелкните stdole.

  4. В разделе Классы изучите класс с именем StdFont.

Дополнительные сведения об интерфейсе IFontDisp см. в разделе Microsoft Platform SDK на сайте MSDN, Microsoft Developer Network.

Задание свойства HeaderFooterFont эквивалентно настройке значений в поле Шрифт в диалоговом окне Выбор шрифта (перейдите на вкладку Файл , нажмите кнопку Печать, нажмите кнопку Предварительный просмотр, в группе Предварительный просмотр выберите Колонтитул & нижний колонтитул, а затем нажмите кнопку Выбрать шрифт).

Пример

В следующем примере кода показано, как использовать свойство HeaderFooterFont , чтобы получить ссылку на текущий объект Font и задать для текстового шрифта документа значение Arial, не полужирное.

 
Public Sub HeaderFooterFont_Example()  
 
    Dim objStdFont As StdFont 
 
    Set objStdFont = ThisDocument.HeaderFooterFont  
    objStdFont.Name = "Arial"  
    objStdFont.Bold = False 
    Set ThisDocument.HeaderFooterFont = objStdFont  
 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.