【実務・中級編】文字列操作における連結演算子「&」と「+」の挙動の違い – Excel VBA解析バイブル

Excel VBAを掌握する極限の知見：文字列連結「&」と「+」の深淵なる罠と、数百万行をも唸らせる最適化戦略

開発現場で、次のようなコードを見て冷や汗をかいたことはないか？

‘ ありがちな不穏なコード
Dim fullName As String
fullName = ws.Cells(row, 1).Value + ” ” + ws.Cells(row, 2).Value

一見すると何の問題もないように思えるかもしれない。しかし、この数行にはVBAのデータ型、メモリ管理、そして最悪のバグを引き起こす地雷が完璧に埋め込まれている。

こんにちは。チーフアーキテクトの私だ。今回は、VBAにおける文字列連結演算子「`&`」と「`+`」の決定的な挙動の違い、そして実務の現場で絶対に避けるべきアンチパターンと、大量データを一瞬で処理するための極限の最適化手法を伝授する。

「動けばいい」というアマチュアのコードを卒業し、プロフェッショナルとしての堅牢な設計を手に入れてほしい。

—

1. 演算子「&」と「+」の根本的な思想の違い

まず、VBAのパーサ（構文解析器）がこれらをどう扱っているかを知る必要がある。

`&`（アンパサンド）: 純粋な文字列連結演算子。オペランドが数値であれ、何であれ、強制的に文字列にキャストして結合する。
`+`（プラス）: 算術加算および多目的演算子。Variant型の動的な型推論に依存するため、文脈によって挙動がガラリと変わる。

この「文脈による変化」こそが、VBA開発者を地獄に突き落とす原因となる。

Null値が混入したときの運命の分かれ道

実務において、データベースや未入力のExcelセルから取得したデータには `Null` が含まれている可能性がある。この時、`&` と `+` は全く異なる挙動を示す。

そう、`+` を文字列連結に使っている場合、片方の変数が `Null`（あるいは未初期化のVariant）になった瞬間、結合結果全体が `Null` に変貌するのだ。

画面に出力したときに突然の「空白」や、データベースへの書き込み時の「型不一致エラー（Runtime Error 13）」に悩まされたことはないか？原因の多くは、この `+` の伝播特性にある。

鉄則：文字列の結合には、例外なく `&` を使え。`+` は数学的な足し算にのみ許可される。

—

2. パフォーマンスの暗黒面：なぜ「ループ内の `&`」は悪なのか

次に、ループ処理におけるパフォーマンスの話をしよう。
「数万行のログやマスターデータを結合して一つのファイルに出力する」という要件があったとする。ここでよく見かけるのが、以下のような愚行だ。

❌ 絶望的なアンチパターン（O(N^2)の悲劇）

Dim result As String
Dim i As Long

For i = 1 to 50000
‘ ループのたびにメモリの再割り当てが発生する
result = result & ws.Cells(i, 1).Value & vbCrLf
Next i

なぜこれが悪なのか？
VBA（および内部のCOM文字列マネージャ）において、String型は不変（イミュータブル）ではない。文字列を `&` で繋ぐたびに、VBAは以下の重い処理を裏で実行している。

1. 既存の文字列の長さを計算する。
2. 新しい文字列に必要なメモリ領域をヒープ上に「新しく確保」する。
3. 古い文字列の内容を、新しいメモリ領域に「コピー」する。
4. 新しい断片を追加する。
5. 古いメモリ領域を解放する。

これを5万回繰り返すとどうなるか？メモリの断片化（メモリフラグメンテーション）が引き起こされ、CPU使用率は跳ね上がり、処理はみるみるうちに遅くなっていく（後半になるにつれてコピーするデータ量が激増するため、計算量は $O(N^2)$ に近づく）。

—

3. 救世主：`Join` 関数と配列による圧倒的最適化

このパフォーマンスの壁を突破する唯一にして最善の解が、「配列への蓄積」と「`Join` 関数の利用」である。

メモリ上に一度だけ必要なサイズの配列（あるいはCollection、Dictionaryだが、速度面では配列が最速）を確保し、そこにデータを詰め込み、最後に一撃で結合する。

⭕ プロフェッショナルな実装コード

以下のコードは、数万行のExcelデータをノーウェイトで結合し、外部に出力するための堅牢なプロダクションコードだ。エラーハンドリングとメモリの効率化を完璧に網羅している。

Option Explicit

Public Sub ExportConcatenatedData()
Dim ws As Worksheet
Set ws = ActiveSheet

Dim lastRow As Long
lastRow = ws.Cells(ws.Rows.Count, “A”.Row).End(xlUp).Row

If lastRow < 1 Then Exit Sub ' 1. 対象データを一括してメモリ上の二次元配列へロード（極めて高速） Dim rawData As Variant rawData = ws.Range(ws.Cells(1, 1), ws.Cells(lastRow, 3)).Value ' 2. 結合用の一次元配列を確保 Dim buffer() As String ReDim buffer(1 To lastRow) Dim i As Long Dim validCount As Long validCount = 0 ' 3. ループ内では「&」ではなく配列への代入のみを行う（O(N)の極限パフォーマンス） For i = 1 To lastRow ' NullやEmptyの安全なハンドリング（空文字にフォールバック） Dim col1 As String, col2 As String, col3 As String col1 = IIf(IsNull(rawData(i, 1)), "", CStr(rawData(i, 1))) col2 = IIf(IsNull(rawData(i, 2)), "", CStr(rawData(i, 2))) col3 = IIf(IsNull(rawData(i, 3)), "", CStr(rawData(i, 3))) ' 安全な「&」演算子による行内結合 validCount = validCount + 1 buffer(validCount) = col1 & "," & col2 & "," & col3 Next i ' 実際の有効行数に合わせてリサイズ If validCount < lastRow Then ReDim Preserve buffer(1 To validCount) End If ' 4. Join関数による一括文字列化（C言語レベルの最適化ルーチンが走る） Dim finalResult As String finalResult = Join(buffer, vbCrLf) ' デバッグ出力（実務ではテキストファイル出力やAPI送信へ流し込む） Debug.Print "結合完了: " & Len(finalResult) & " 文字" ' 後片付け Erase rawData Erase buffer End Sub

このコードの優れている点

1. セルへのアクセス回数を最小化: `ws.Cells().Value` を何度も叩くのではなく、`Range.Value` で一次変数（バリアント配列）に一撃でメモリロードしている。ExcelのオブジェクトモデルへのアクセスはVBAにおいて最大のボトルネックであるため、これを1回に抑えるのが鉄則。
2. `IIf` と `IsNull` による堅牢性: データベース連携やCSVインポートデータによくある `Null` 値の混入を完全にガードし、意図しない `Null` 伝播や型エラーをシャットアウトしている。
3. `Join` 関数の圧倒的スピード: 配列を数千〜数万個連結する際、`Join` 関数は内部的にC言語の高度に最適化されたメモリ結合ルーチンを使用するため、ループ内で `&` を繋ぐコードと比較して何十倍、何百倍もの速度差を生み出す。

—

4. チーフアーキテクトからの提言

コードは単に「動けばいい」というものではない。動かす環境のデータ量が増大したとき、あるいは誰も予想していなかった `Null` が飛び込んできたとき、そのコードが耐えられるかどうかがプロとアマの境界線だ。

文字列の結合には、必ず `&` を使え（`+` は封印せよ）。
ループ内での文字列の直接結合（`str = str & …`）は、パフォーマンスの殺人行為である。
大量データには 配列＋ `Join` 関数 のコンボを叩き込め。

この原則を守るだけで、あなたの書くVBAコードは見違えるほど堅牢になり、実務の現場で「おっ、できるな」と言わせるシステムへと生まれ変わるはずだ。

妥協なき設計を、健闘を祈る。