第33回.セルの書式（フォント,Font）
セルで表示している文字の書体をマクロVBAで指定する方法です。
セル（Rangeオブジェクト）のフォントは、Fontプロパティになります。
オブジェクトは階層構造になっており、
下位のオブジェクトを参照する時は、
そのオブジェクトを返すプロパティを経由しているのです。
つまり、Fontプロパティを経由してFontオブジェクトを扱うという事になります。
とにかく、
Range.Fontでセルのフォントを扱うという事を理解してください。
マクロでの指定
| プロパティ | プロパティの説明 | プロパティの設定値と説明 |
| Name | フォント名 | |
| FontStyle | フォント スタイル | 下のBoldとItalicを使用して下さい。 |
| Bold | 太字 | True、False |
| Italic | 斜体 | True、False |
| Size | フォントのサイズ | |
| Strikethrough | 水平な取り消し線 | True、False |
| Superscript | 上付き文字 | True、False |
| Subscript | 下付き文字 | True、False |
| OutlineFont | アウトライン フォント | True、False |
| Shadow | 影付きフォント | True、False |
| Underline | 下線の種類 | xlUnderlineStyleNone |
| xlUnderlineStyleSingle | ||
| xlUnderlineStyleDouble | ||
| xlUnderlineStyleDoubleAccounting | ||
| Color | フォントの色 | RGB値を表す長整数、色定数またはRGB関数 |
| ColorIndex | フォントの色 | 2003までの56色カラーパレットのインデックス 何色か分かりづらいのでColorを使ったほうが良い |
| ThemeColor | 配色のテーマ カラー | 2007以降のみ |
| TintAndShade | 色を明るく、または暗く | 2007以降のみ |
| ThemeFont | テーマのフォント | 2007以降のみ |
Excel2007以降で追加されたプロパティがあります。
2007では色に関して大きく機能強化されたので、それに伴うプロパティの追加となっています。
テーマそのものについては、マクロVBAではなくブックで設定しておいたほうが良いでしょう。
色定数
| vbBlack | 黒 |
| vbRed | 赤 |
| vbGreen | 緑 |
| vbYellow | 黄 |
| vbBlue | 青 |
| vbMagenta | マゼンタ |
| vbCyan | シアン |
| vbWhite | 白 |
Range("セル範囲").Font.Color = vbRed '赤
Range("セル範囲").Font.Color = vbWhite '白
Range("セル範囲").Font.Color = vbBlack '黒
RGB値を表す長整数の代わりに、上記の定数を使用することが出来ます。
カラー定数以外にも、XlRgbColor列挙などで指定することもできます。
Colorプロパティの設定値一覧
RGB関数
Range("セル範囲").Font.Color = RGB(255, 0, 0) '赤
Range("セル範囲").Font.Color = RGB(255, 255, 255) '白
Range("セル範囲").Font.Color = RGB(0, 0, 0) '黒
色の指定を解除（自動）
Range("セル範囲").Font.ColorIndex = xlAutomatic
見た目の結果は黒文字になりますが、黒を指定した状態とは違います。
あくまで、「自動」と「黒」は違うということを理解しておいてください。
フォント(Font)設定についての注意点
同じデータでも、フォントが違う事で見易さが格段に違ってきます。
しかしその見易さは、人によっても感性の違いもありますし、時代とともに変化もしていきます。
このように、正解のない部分は、
いつでも簡単に変更できるようにしておいた方が、保守性が良いという事になります。
つまり、何でもマクロで設定してしまうより、
なるべくシートで自由にフォントを設定しておけるようにした方が良い場合も多いという事です。
同じテーマ「マクロVBA入門」の記事
第30回.総合練習問題3
第31回.セルの書式（表示形式,NumberFormatLocal）
第32回.セルの書式（配置,Alignment）
第33回.セルの書式（フォント,Font）
第34回.セルの書式（塗りつぶし,Interior）
第35回.セルの書式（罫線,Border）
第36回.総合練習問題4
第37回.ブック・シートの指定
第39回.セルのクリア（Clear,ClearContents）
第40回.セルのコピー・カット&ペースト（Copy,Cut,Paste）
第41回.セルのコピー&値の貼り付け（PasteSpecial）
新着記事NEW ・・・新着記事一覧を見る
列全体を指定する時のRangeとColumnsの違い｜ツイッター出題回答 (2023-09-24)
シートのActiveXチェックボックスの指定方法｜ツイッター出題回答 (2023-09-24)
ByRef引数の型が一致しません。｜ツイッター出題回答 (2023-09-22)
シートコピー後のアクティブシートは何か｜ツイッター出題回答 (2023-09-19)
Excel関数の引数を省略した場合について｜ツイッター出題回答 (2023-09-14)
セル個数を返すRange.CountLargeプロパティとは｜VBA技術解説(2023-09-08)
記号を繰り返してグラフ作成（10単位で折り返す）｜ツイッター出題回答 (2023-08-28)
シートを削除：不定数のシート名に対応｜VBAサンプル集(2023-08-24)
ランクによりボイントを付ける（同順位はポイントを分割）｜ツイッター出題回答 (2023-08-22)
OneDrive使用時のThisWorkbook.Pathの扱い方｜VBA技術解説(2023-07-26)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.RangeとCellsの使い方｜VBA入門
3.繰り返し処理（For Next)｜VBA入門
4.変数宣言のDimとデータ型｜VBA入門
5.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
6.マクロとは？VBAとは？VBAでできること｜VBA入門
7.ブックを閉じる・保存（Close,Save,SaveAs）｜VBA入門
8.並べ替え（Sort）｜VBA入門
9.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
10.条件分岐（IF）｜VBA入門
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。