Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

フォント名（Name,ThemeFont,StandardFont）

2015/07/27 2015/08/26

フォント名を取得・設定する（Name プロパティ）

Name プロパティは、オブジェクトのフォント名を文字列型（String）で、取得・設定します。

【書式】

＜取得＞
object.Name

＜設定＞
object.Name = string

引数・戻り値

object ・・・対象となる Font オブジェクトを指定します。
string ・・・フォント名を指定します。

テーマのフォント（ThemeFont プロパティ）

ThemeFont プロパティは、テーマで使用しているフォントを利用するかどうかを指定します。設定には、テーマのフォントを表す定数（XlThemeFont 列挙）を使用します。

【書式】

＜取得＞
object.ThemeFont

＜設定＞
object.ThemeFont = const

引数・戻り値

object ・・・対象となる Font オブジェクトを指定します。

const ・・・ テーマのフォントを表す定数やその値を指定します。

定数	値	内容
xlThemeFontMajor	2	テーマのフォント（見出し）
xlThemeFontMinor	1	テーマのフォント（本文）
xlThemeFontNone	0	テーマのフォントを使用しません

ThemeFont プロパティは、Excel 2007 以降でしか使用できません。

標準フォント名の取得・設定（StandardFont プロパティ）

StandardFont プロパティで、標準フォントを文字列型（String）で、設定・取得します。フォントを指定していない場合、このStandardFont プロパティのフォントが使用されます。

【書式】

＜取得＞
object.StandardFont

＜設定＞
object.StandardFont = string

引数・戻り値

object ・・・対象となる Application オブジェクトを指定します。
string ・・・フォント名を指定します（文字列型）。

StandardFont プロパティの対象オブジェクトは、Application オブジェクトです。

StandardFont プロパティで、標準フォントを変更した場合、Excel を再起動するまで変更は反映されません。

フォント名・標準フォント名の取得・設定使用例

サンプルVBAソース

　
Sub Sample_Font02()

    'セル「C2」入力・文字列設定（メイリオ）
    Range("C2").Value = "あいうえ"
    Range("C2").Font.Name = "メイリオ"
    
    'セル「C5」入力・文字列設定（テーマのフォント「見出し」）
    Range("C5").Value = "ABCDE"
    Range("C5").Font.ThemeFont = xlThemeFontMajor
    
    
    'セル「C2」のフォント名
    Range("A2").Value = Range("C2").Font.Name
    
    'セル「C5」のフォント名
    Range("A5").Value = Range("C5").Font.Name
    
    '標準フォント名
    Range("A8").Value = Application.StandardFont


End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

　

Sub Sample_Font02()

'セル「C2」入力・文字列設定（メイリオ）

Range("C2").Value = "あいうえ"

Range("C2").Font.Name = "メイリオ"

'セル「C5」入力・文字列設定（テーマのフォント「見出し」）

Range("C5").Value = "ABCDE"

Range("C5").Font.ThemeFont = xlThemeFontMajor

'セル「C2」のフォント名

Range("A2").Value = Range("C2").Font.Name

'セル「C5」のフォント名

Range("A5").Value = Range("C5").Font.Name

'標準フォント名

Range("A8").Value = Application.StandardFont

End Sub

　

実行結果

- VBA基本 Application オブジェクト, Font オブジェクト, Name プロパティ, StandardFont プロパティ, ThemeFont プロパティ, VBA基本, エクセルVBA

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: セルのデータを区切り文字で複数のセルに分割する（TextToColumns メソッド）

TextToColumns メソッド TextToColumns メソッドを使用 …

: 変数がEmpty 値かどうかをチェックする（ IsEmpty 関数）

IsEmpty 関数の使い方【書式】 result = IsEmpty ( e …

: 配列（多次元配列・配列の次元の変更）

多次元配列【書式】　多次元配列の宣言＜静的配列（固定長配列）＞ Dim my …

: 日付時刻：現在の日付・時刻を取得・設定（Now、Date、Time）

現在の日付・時刻を取得・設定現在の日付・時刻を取得（Now 関数、Date 関 …

: 文字列：文字列変数の値を右詰めまたは左詰めにする（RSet ステートメント・LSet ステートメント）

RSet ステートメント・LSet ステートメント【書式】＜ RSet ステ …

: フォントサイズ（Size プロパティ・StandardFontSize プロパティ）

フォントサイズを取得・設定する（Size プロパティ） Size プロパティは、 …

: カレントフォルダの取得・設定（DefaultFilePath プロパティ）

DefaultFilePath プロパティカレントフォルダとは、ブックを開いた …

: 上付き文字・下付き文字（Superscript,Subscript）

上付き文字（Superscript プロパティ） Superscript プロパ …

: 文字列：文字列の長さを取得（ Len 関数、LenB 関数）

Len 関数（文字列の長さを取得）【書式】 result_len = Len …

: 文字列：文字列を指定した形式に変換する（StrConv 関数）

StrConv 関数の使い方【書式】 result = StrConv ( s …

PREV: フォント太字・斜体（Bold, Italic, FontStyle プロパティ）
NEXT: フォントサイズ（Size プロパティ・StandardFontSize プロパティ）