Word) (FontNames 物件

代表所有可用之字型的名稱清單。

註解

使用 FontNames 、 LandscapeFontNames 或 PortraitFontNames 屬性可傳回 FontNames 物件。 下列範例會顯示可用直向字型數目。

MsgBox PortraitFontNames.Count & " fonts available"

此範例會列出使用中文件的結尾 FontNames 物件中的所有字型名稱。

For Each aFont In FontNames 
 ActiveDocument.Range.InsertAfter aFont & vbCr 
Next aFont

使用可傳回字型名稱的 FontNames (Index)，其中 Index 是索引編號。 下列範例會顯示 FontNames 物件中的第一個的字型名稱。

MsgBox FontNames(1)

注意事項

[!注意事項] 您無法在可用的字型名稱清單中新增名稱或移除名稱。

請參閱

Word 物件模型參考資料

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。