FontNames オブジェクト (Word)
使用できるフォントの名前の一覧を表します。
FontNames 、 LandscapeFontNames 、または PortraitFontNames プロパティを使用して、 FontNames オブジェクトを取得します。 次の例では、使用可能な縦フォントの数を表示します。
MsgBox PortraitFontNames.Count & " fonts available"
次の使用例は、作業中の文書の最後に、 FontNames オブジェクト内のすべてのフォント名を一覧表示します。
For Each aFont In FontNames
ActiveDocument.Range.InsertAfter aFont & vbCr
Next aFont
FontNames (インデックス)、インデックスがインデックス番号を使用して、フォントの名前を返します。 次の使用例は、 FontNames オブジェクトの最初のフォント名を表示します。
MsgBox FontNames(1)
注意
[!メモ] 使用できるフォント名の一覧にフォント名を追加したり、削除したりすることはできません。
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。