Свойство Application.PortraitFontNames (Word)

Возвращает объект FontNames , включающий имена всех доступных книжных шрифтов.

Синтаксис

выражение. PortraitFontNames

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

Пример

В этом примере вставляется список книжных шрифтов в точке вставки.

For Each aFont In PortraitFontNames 
 With Selection 
 .Collapse Direction:=wdCollapseEnd 
 .InsertAfter aFont 
 .InsertParagraphAfter 
 .Collapse Direction:=wdCollapseEnd 
 End With 
Next aFont

См. также

Объект Application

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

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