共用方式為


Word) (Application.PortraitFontNames 屬性

會傳回包含所有可用直向字型之名稱的 FontNames 物件。

語法

expressionPortraitFontNames

expression 代表 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 支援與意見反應