Excel VBAの深淵：Withステートメントの「魔法」を正しく使いこなす設計術
こんにちは。現場で泥臭い自動化と格闘し続けてきた諸君。
「マクロの記録」で生成された、あの長く、読み解くのが苦痛なコードに別れを告げる時が来ました。
今日は、多くの初心者が陥る罠——「Withステートメントの多重ネスト」について話をしましょう。これを制御できるようになれば、君の書くコードは「動くだけのスクリプト」から「保守可能な資産」へと進化します。
—
1. なぜ「Withのネスト」は悪なのか？
まず、初心者がやりがちな「良くないコード」を見てください。
‘ 非推奨：ネストが深く、どこを操作しているか見失いやすい
With Workbooks(“Book1.xlsx”).Worksheets(“Sheet1”)
With .Range(“A1”)
.Value = “売上”
With .Font
.Bold = True
.Color = vbRed
End With
End With
With .Range(“B1”)
.Value = 1000
End With
End With
これを見て「お、効率的じゃないか」と思ったなら要注意。
コードが長くなればなるほど、「今、どの階層のWithの中にいるのか？」を人間は脳内で維持できなくなります。特に途中でエラーが起きた時、どのオブジェクトが正しく参照されているかデバッグするのは至難の業です。
2. 「オブジェクト参照を代入する」という発想
プロのコードでは、`With`を多用する代わりに「オブジェクト変数」を使います。これこそが、VBAを掌握するための第一歩です。
オブジェクトを一度変数に格納してしまえば、階層を掘る必要はありません。
‘ 推奨：オブジェクトを変数に格納してフラットに扱う
Dim targetSheet As Worksheet
Dim headerCell As Range
‘ 参照をセットする
Set targetSheet = Workbooks(“Book1.xlsx”).Worksheets(“Sheet1”)
Set headerCell = targetSheet.Range(“A1”)
‘ 階層を意識せず、シンプルに記述
headerCell.Value = “売上”
With headerCell.Font
.Bold = True
.Color = vbRed
End With
ここがポイント：
オブジェクト変数（`targetSheet`など）を使うと、VBE（エディタ）の強力な武器である「インテリセンス（入力補完）」が効くようになります。`.`（ドット）を打った瞬間にプロパティが候補として出る。この恩恵を受けない手はありません。
3. 設計の知見：階層構造を「分解」せよ
複雑な処理を一つのプロシージャに詰め込むから、`With`のネストが深くなるのです。
処理を「小さな部品（サブプロシージャ）」に分解してください。
- メイン処理： 全体の流れを制御する
- サブ処理： 特定のオブジェクト（セルやシート）を加工する
具体的なコード例
Sub Main()
Dim ws As Worksheet
Set ws = ThisWorkbook.Worksheets(“Data”)
‘ 各セルへの処理を個別の引数として渡す
FormatHeader ws.Range(“A1”)
FormatData ws.Range(“B1”)
End Sub
Private Sub FormatHeader(target As Range)
‘ 渡されたオブジェクトだけを制御する
With target
.Value = “Header”
.Font.Bold = True
End With
End Sub
このように「関数の入り口でオブジェクトを限定」すれば、`With`は一段階だけで完結します。これが「可読性の高いコード」の極意です。
—
4. まとめ：初心者が目指すべき「美しいコード」の基準
今日から意識してほしいのは、以下の3点です。
1. Withは「1階層」を原則にする： 2重以上のネストが必要なときは、コードの切り出し時だと判断してください。
2. オブジェクト変数を活用する： `Set`を使って名前を付けることで、コードに「意味」を持たせましょう。
3. 「マクロの記録」をそのまま使わない： 記録されたコードは「動く」だけで「設計」されていません。それを「どう整理するか」がエンジニアの腕の見せ所です。
VBAは、書き手の思考がそのまま反映される正直な言語です。
「どこで」「何に対して」処理をしているのかを常に明確にすれば、君のコードは驚くほど読みやすく、そして強靭なものに変わります。
ここをクリアすれば、君はもう初心者ではありません。
さあ、エディタを開いて、一つひとつ丁寧にオブジェクトを定義するところから始めてみましょう。応援していますよ。
