Word) (Application.FontNames 屬性
會傳回包含所有可用字型之名稱的 FontNames 物件。 唯讀。
語法
expression。 FontNames
expression 代表 Application 物件的變數。
範例
本範例會顯示 FontNames 集合中的字型名稱。
Dim strFont As String
Dim intResponse As Integer
For Each strFont In FontNames
intResponse = MsgBox(Prompt:=strFont, Buttons:=vbOKCancel)
If intResponse = vbCancel Then Exit For
Next strFont
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。