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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 日付時刻：年・月・日を取得（Year、Month、Day 関数）

日付から年・月・日を取得する関数【書式】 date_year = Year ( …

: データをクリアする（ClearContents メソッド）

ClearContents メソッド対象がセル範囲（Range オブジェクト） …

: セルのデータを固定長形式で複数のセルに分割する（TextToColumns メソッド・Parse メソッド）

固定長形式でセルを分割 TextToColumns メソッドや Parse メソ …

: 文字列：指定した数の空白（スペース）からなる文字列を返す（Space 関数）

Space 関数【書式】 result = Space ( number ) …

: Erase ステートメント（配列の初期化・動的配列のメモリ解放）

Erase ステートメントの使い方【書式】 Erase myArray [, …

: カレントフォルダ（CurDir 関数、ChDir ステートメント、ChDrive ステートメント）

カレントフォルダカレントフォルダとは、ブックを開いたり保存するときに既定で参照 …

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

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

: 変数が配列かどうかをチェックする（ IsArray 関数）

IsArray 関数の使い方【書式】 result = IsArray( va …

: XlThemeColor 列挙型

XlThemeColor 列挙定数値内容 xlThemeColorDark …

: 日付時刻：日付・時刻の間隔を取得（ DateDiff 関数）

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

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