概要：VBAにおける「実行速度」というエンジニアの聖域
Excel VBAで業務効率化を目指す際、避けては通れないのが「実行速度」の問題です。数千行、数万行のデータを扱う際、コードの書き方一つで処理時間が数秒から数分、あるいは数時間にまで変わることがあります。多くのエンジニアが「なんとなく」で使い分けているRangeとCells、あるいはForループとForEachの選択。これらは単なる記述の好みの問題ではなく、VBA内部でのメモリ管理やオブジェクト参照のオーバーヘッドに直結する重要な技術的決定です。本記事では、VBA界のパフォーマンスを左右する主要メソッドとループ構造を徹底比較し、実務で最速のパフォーマンスを引き出すための最適解を提示します。
詳細解説：RangeとCellsの内部構造とアクセス速度
VBAでセルを操作する際、最も頻繁に利用されるのがRangeオブジェクトとCellsプロパティです。一見すると同じセルを指し示すこれらのオブジェクトですが、内部的な挙動には明確な差があります。
Range(“A1”)という記述は、文字列としてアドレスを解析（パース）するプロセスを内部で含んでいます。一方、Cells(1, 1)は行番号と列番号という数値で直接指定するため、Rangeと比較して文字列解析のオーバーヘッドが発生しません。しかし、単一のセルアクセスであればその差は微々たるものです。問題となるのは「ループ内での大量アクセス」です。
Range(“A” & i)のように文字列結合をループ内で行う場合、VBAは毎回新しい文字列を生成し、それをRangeオブジェクトとして再評価します。これはメモリを浪費し、処理速度を著しく低下させます。これに対し、Cells(i, 1)であれば数値演算のみで完結するため、理論上も実測値としてもCellsの方が高速です。ただし、Range(“A1:B100”).Valueのように、配列として一括でデータを取得する手法を併用すれば、個別のセルアクセス自体を最小限に抑えることが可能です。
ループ構造の最適化：For vs For Each vs Do
次に、ループ処理の比較を行います。VBAにおけるループ構造にはFor…Next、For Each…Next、Do…Loopが存在します。
1. For…Next: インデックス番号を用いた数値管理に適しています。特定範囲を指定してループする際に最も直感的ですが、Rangeオブジェクトを逐次参照するコードを書くと極端に遅くなります。
2. For Each…Next: コレクションを対象にイテレータを回す形式です。Rangeオブジェクトの集合体（範囲）に対して最も高速にアクセスできます。オブジェクトのプロパティを直接操作する場合、For…NextよりもFor Each…Nextの方が内部的な処理ステップが少ない傾向にあります。
3. Do…Loop: 条件式に基づいてループを制御します。データの終端が不明な場合や、動的な終了条件が必要な場合に重宝しますが、カウンタ管理を自分で行う必要があるため、配列操作や範囲操作においてはFor系に劣るケースが多いです。
サンプルコード：実測で証明する最適化のテンプレート
以下に、数万件のデータを処理する際のパフォーマンスを最適化したコード例を示します。ここでは「配列への一括転送」と「For Eachの活用」を組み合わせています。
Sub FastDataProcessing()
Dim ws As Worksheet
Dim rng As Range
Dim dataArr As Variant
Dim cell As Range
Dim i As Long
Set ws = ThisWorkbook.Sheets("Sheet1")
' 1. セル範囲を配列に一括格納（メモリ上の操作に切り替える）
dataArr = ws.Range("A1:A50000").Value
' 2. 配列に対するForループ（最も高速）
For i = LBound(dataArr, 1) To UBound(dataArr, 1)
If dataArr(i, 1) > 100 Then
dataArr(i, 1) = dataArr(i, 1) * 2
End If
Next i
' 3. 結果をシートに一括書き出し
ws.Range("A1:A50000").Value = dataArr
' 4. 特定のRange範囲を操作する場合のForEach
' 既にメモリ上にある場合はForEachが最も綺麗に書ける
For Each cell In ws.Range("B1:B50000")
If cell.Value = "" Then cell.Interior.Color = vbYellow
Next cell
End Sub
実務アドバイス：速度を劇的に改善する隠れたテクニック
コードの書き方を最適化する以前に、VBAの実行速度を劇的に向上させる「黄金のルール」があります。これを守るだけで、ループ処理の速度は10倍から100倍に跳ね上がります。
・画面更新の停止：Application.ScreenUpdating = False を処理の冒頭で宣言し、最後にTrueに戻してください。描画処理はVBAにおいて最もコストの高い処理の一つです。
・自動計算の停止：Application.Calculation = xlCalculationManual を使用し、処理中に関数再計算を止めます。
・直接参照を避ける：ループ内で「Worksheets(“Sheet1”).Range(“A1”)」のようにフルパスで記述すると、VBAは毎回オブジェクト階層を探索します。必ず変数にSetしてから参照してください。
・配列処理の徹底：セルを一つずつ読み書きするのは「VBAの自殺行為」です。一度ワークシート上のデータをVariant型の配列に代入し、メモリ上で計算し、最後に一括で書き出す。これがVBAにおける現代的なパフォーマンスチューニングの鉄則です。
まとめ：プロフェッショナルが選ぶべき選択基準
結論として、VBAの速度を最適化するための指針をまとめます。
1. セルへの直接アクセスは極力避ける。RangeのValueを一括で配列に取り込むのが最速。
2. 配列操作が不可能な場合は、For Each…Next を選択する。
3. ループ内での文字列結合（Range(“A” & i)）は厳禁。数値で扱えるCells(i, 1)を優先する。
4. 処理の前後でApplication設定（画面更新、自動計算）を制御し、オーバーヘッドを徹底排除する。
VBAは「遅い言語」と言われることがありますが、それは多くの場合、書く側のアルゴリズムに起因します。メモリとオブジェクトモデルの特性を理解すれば、VBAは業務自動化において依然として最強のツールとなり得ます。今回紹介した手法を実務のコードに組み込み、ストレスのない爆速マクロ環境を構築してください。技術の差は、こうした細部へのこだわりによって明確に現れます。より高度なVBAエンジニアを目指すのであれば、今日から「セルに直接触れない」という哲学を徹底してみてください。それが、プロとアマチュアを分かつ決定的な境界線となるはずです。
