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

関連記事

: 四捨五入・切り上げ・切り捨て・丸め（Round 関数他）

Round 関数（丸め）の使い方【書式】 value = Round ( ex …

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

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

: 文字列：文字列の一部を別の文字列で置換（Replace 関数）

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

: 乱数ジェネレータを初期化 (乱数系列を再設定) する（Randomize ステートメント）

Randomize ステートメントの使い方 Rnd 関数を使用する前に使用しま …

: 出力位置、書き込み位置を設定（Tab 関数）

出力位置、書き込み位置を設定 Tab 関数は、Print メソッド、または P …

: ショートカットメニュー（CommandBar オブジェクト）

ショートカットメニュー（コンテキストメニュー）右クリックで表示されるメニューの …

: 指定した数のスペースを挿入する（Spc 関数）

指定した数のスペースを挿入指定した数のスペースを挿入するには、Spc 関数を使 …

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

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

: オートシェイプの種類を表す定数（MsoAutoShapeType 列挙型）

MsoAutoShapeType 列挙型オートシェイプオブジェクトの図形の種類 …

: 日付時刻：時・分・秒を取得（Hour、Minute、Second 関数）

日付時刻から時・分・秒を取得する関数【書式】 time_hour = Hour …

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