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

関連記事

: Option Compare ステートメント

Option Compare ステートメントの使い方【書式】 Option C …

: 色の設定（ThemeColor プロパティ・TintAndShade プロパティ）

ThemeColor プロパティ・TintAndShade プロパティテーマカ …

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

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

: 色を設定する（QBColor 関数）

QBColor 関数 QBColor 関数は、指定した色番号に対応するRGB コ …

: ある数値が、複数の範囲のどの範囲に含まれるかを示す文字列を返す（Partition 関数）

Partition 関数の使い方 Partition 関数は、ある数値が、区切 …

: 日付時刻：文字列から日付・時刻データを取得（ DateValue 関数、TimeValue 関数）

DateValue 関数（文字列から日付データを取得）【書式】 date_va …

: 文字列：文字列の指定した位置から指定文字数取得（Mid 関数,MidB 関数）

Mid 関数・MidB 関数の使い方【書式】 result_mid = Mi …

: 配列（宣言・要素数の変更について）

配列の宣言【書式】※ 配列の宣言＜Type 型の静的配列（固定長配列）の宣言 …

: VBA で正規表現を使う（RegExp オブジェクト）

RegExp オブジェクト VBA で正規表現を使うには、VBScript のR …

: コレクション（Collection）オブジェクト「連想配列」

コレクション（Collection）オブジェクトの使い方【書式】 Dim my …

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