セルの一文字目だけ大きくする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の使い方などを紹介し続けています。
日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

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

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

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

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

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

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

Excel VBAの経験がある方を対象に、Word VBAの基本をキンドル本としてまとめました↓↓

Excel VBAユーザーの方を対象として、Wordの表をVBAで操作する基礎をまとめました↓↓

図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓

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

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

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