CSVという「動く標的」を射抜く：VBScriptにおける動的列マッピングの極意
現場で長くシステムを運用していると、必ず直面する問題がある。外部システムから送られてくるCSVファイルの「列順序」が、ある日突然、何の予告もなく変更されるという事象だ。
「昨日は左から3番目だったIDが、今日は5番目になっている」。この変化にコードのハードコーディングで追従するのは、保守性を放棄したエンジニアの所業である。今回は、VBScriptという一見古臭いツールを用いながら、メモリを浪費せず、かつ列の順序変動に一切動じない「動的列マッピング」の設計術を伝授する。
—
1. なぜ「Dictionary」なのか：メモリと検索のトレードオフ
VBScriptでCSVを扱う際、配列（Array）でのインデックス管理は禁じ手だ。列順が変わった瞬間にロジックが崩壊するからだ。
我々が採用すべきは `Scripting.Dictionary` オブジェクトである。ヘッダー行を読み込み、`列名=インデックス` のペアを生成する。これにより、データ行を処理する際は「インデックス」ではなく「名前」で値にアクセスできる。これは単なる記述の簡略化ではない。結合度（Coupling）を下げ、インターフェースをデータ側に委譲する設計なのだ。
—
2. 実装：堅牢なCSVパーサーのアーキテクチャ
以下に示すコードは、大規模なログ処理でもメモリを圧迫しないよう、I/Oバッファを最小限に抑えつつ、動的マッピングを実現するテンプレートだ。
‘ ヘッダー名から列インデックスを動的に解決するクラスライブラリの思想
Option Explicit
‘ メモリ管理の鉄則：オブジェクトは必要最小限のスコープで生成・解放する
Function ParseCSV(strFilePath)
Dim objFSO, objFile, strLine, arrHeaders, dictMap
Dim i, colName
Set objFSO = CreateObject(“Scripting.FileSystemObject”)
Set objFile = objFSO.OpenTextFile(strFilePath, 1) ‘ 1=ForReading
Set dictMap = CreateObject(“Scripting.Dictionary”)
‘ 1. ヘッダー行を読み込み、マッピングを作成
If Not objFile.AtEndOfStream Then
strLine = objFile.ReadLine
arrHeaders = Split(strLine, “,”)
For i = 0 To UBound(arrHeaders)
‘ トリムして余計な空白を除去、キーとして格納
dictMap.Add Trim(arrHeaders(i)), i
Next
End If
‘ 2. データ行の処理（実務ではここをループさせる）
Do Until objFile.AtEndOfStream
strLine = objFile.ReadLine
Dim arrData : arrData = Split(strLine, “,”)
‘ “ID” という列がどこにあろうと、dictMapを経由して確実に値を取得
If dictMap.Exists(“ID”) Then
WScript.Echo “ID: ” & arrData(dictMap(“ID”))
End If
Loop
‘ 3. 明示的な解放：VBScriptのGCはあてにするな
objFile.Close
Set objFile = Nothing
Set objFSO = Nothing
Set dictMap = Nothing
End Function
—
3. シニアエンジニアが意識すべき「見えないコスト」
この設計において、以下の3点は「プロの流儀」として心に刻んでおいてほしい。
A. インメモリロードの禁止
数ギガバイトのCSVを一度に `ReadAll` するような実装は、レガシー環境では即座にメモリリークやスワップの発生を招く。`ReadLine` を使い、ストリームとして逐次処理するのが鉄則だ。
B. 型の不一致への防衛的プログラミング
VBScriptの変数はVariant型であり、非常に寛容だ。しかし、それが仇となりCSVの空白や予期せぬNULLで計算エラーを引き起こす。`Trim()` や `IsNumeric()` を用いたデータサニタイズ（浄化）は、マッピング後のデータ取得直後に行うべきである。
C. オブジェクトの明示的解放
VBScriptは終了時にガベージコレクションが走るが、WSH環境で長時間実行されるバッチ処理の場合、`Set obj = Nothing` を怠ると、プロセスがメモリを掴み続けることがある。特にCOMオブジェクトの解放順序は、生成の逆順にするのが安全だ。
—
4. 結び：変化を受け入れる設計を
システム間連携における「仕様変更」は、もはや災害と同じである。それを予測して防ごうとするのではなく、「どう変更されても壊れない構造」を作ることこそが、真の自動化エンジニアの役割だ。
この「ヘッダー名による動的マッピング」は、VBScriptという枯れた技術においても、極めてモダンで堅牢なインターフェースを提供してくれる。環境がどれほど古くても、設計思想まで古びる必要はない。
次にCSVを受け取るとき、あなたは「列の場所」を気にする必要はない。ただ、「名前」を呼ぶだけでいいのだ。それこそが、支配者のコードというものだ。
