セルの一文字目だけ大きくするExcelマクロ

対象：Excel2003, Excel2007, Excel2010

「エクセル一文字だけ大きく」
「excel 一番目の文字だけ」
「エクセル vba 1文字目」
という検索がこのサイト・インストラクターのネタ帳で行われていました。

セルの一文字目だけを大きくするVBA（Visual Basic for Applications）マクロを探している方による検索です。

［スポンサードリンク］

以下のようなマクロはいかがでしょうか。

Sub 一文字目だけを大きくする()
　If TypeName(Selection) <> "Range" Then Exit Sub

　Dim rng As Range
　For Each rng In Selection
　　With rng.Characters(1, 1).Font
　　　.Size = .Size + 1
　　End With
　Next
End Sub

文字列の入力されているセルを選択した状態で上記のマクロを実行すると、選択されたセルの一文字目だけが1ポイント大きくなります。

まずセル範囲が選択されていない場合、このSubプロシージャを終了します。
　If TypeName(Selection) <> "Range" Then Exit Sub

セル範囲が選択されているときに、選択されているセル範囲に対してループを回して
　For Each rng In Selection

先頭の一文字目のFontオブジェクトのSizeプロパティに「1」を加算しています。
　　With rng.Characters(1, 1).Font
　　　.Size = .Size + 1

［スポンサードリンク］

『インストラクターのネタ帳』では、2003年10月から平日のほぼ毎日、Microsoft Officeの使い方などを紹介し続けています。
図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓

Excel VBAユーザーを対象とした、Word VBAの入門書をキンドル本として出しました↓↓

グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓

PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓

Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓

日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

上記の『Excel VBAユーザーのためのPythonプログラミング』の元になったキンドル本です↓↓

Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓

小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓

3年前(2021年4月)の
人気記事

「Charactersオブジェクト」の記事一覧