Word VBAからJSON APIへ：ドキュメントを「データソース」へと昇華させる極限のアーキテクチャ
Wordは単なるワープロソフトではない。正しく構造化された表（Table）は、極めて高密度なデータベースである。我々エンジニアが対峙すべきは「見た目の美しさ」ではなく、「情報の純度」だ。
本稿では、Wordの表からデータを抽出し、JSONに変換して外部APIへ叩き込む。この一連のプロセスにおいて、VBAのメモリ管理と通信の堅牢性をいかに担保するか、その深淵を解説する。
—
1. 構造化の原則：表を「データ」として扱うために
Wordの表は、しばしばセル結合やネストによって複雑化する。API連携を成功させる鍵は、「情報の平坦化（Flattening）」にある。
- 正規化の徹底: 結合セルは抽出ロジックを肥大化させる最大要因。可能な限り解除し、重複データとして保持させる。
- 名前定義の活用: 表のブックマーク（Bookmarks）を利用せよ。Rangeオブジェクトを特定することで、文書の更新に耐えうる堅牢な抽出ロジックが完成する。
—
2. 実装の要諦：オブジェクトのライフサイクル管理
VBAにおいて`Set`したオブジェクトを放置するのは、爆弾を抱えて走るようなものだ。特にWordのRange操作はメモリを消費する。必ず`Nothing`で明示的に解放し、参照カウンタを適切に制御せよ。
JSONシリアライズとAPI送信（WinHTTPの活用）
標準的なVBAにはJSONライブラリが存在しない。外部の`ScriptControl`は現代では非推奨だ。ここでは、Windows標準の`WinHttp.WinHttpRequest.5.1`を用い、JSON文字列を直接構築するアプローチをとる。
‘ 伝説的なエンジニアのための、堅牢なAPI送信モジュール
Public Sub PostTableDataToApi(targetTable As Table)
Dim http As Object
Dim jsonPayload As String
Dim i As Long, j As Long
‘ 1. JSONデータの構築（簡易的なシリアライザ）
jsonPayload = BuildJsonFromTable(targetTable)
‘ 2. WinHTTPのインスタンス生成
Set http = CreateObject(“WinHttp.WinHttpRequest.5.1”)
On Error GoTo ErrorHandler
With http
.Open “POST”, “https://api.example.com/v1/data”, False
.SetRequestHeader “Content-Type”, “application/json”
.Send jsonPayload
If .Status = 200 Then
Debug.Print “成功: ” & .ResponseText
Else
Err.Raise vbObjectError + 1000, , “API Error: ” & .Status
End If
End With
Cleanup:
‘ 3. メモリの明示的解放（極めて重要）
Set http = Nothing
Exit Sub
ErrorHandler:
MsgBox “Critical Error: ” & Err.Description
Resume Cleanup
End Sub
Private Function BuildJsonFromTable(tbl As Table) As String
‘ 表データをJSON形式へ変換するロジック
‘ セル内の改行コードやタブを適切にエスケープすること
‘ … (実務では正規表現による置換処理を挟む)
End Function
—
3. レガシー環境における「守りの技術」
社内環境でWord VBAを運用する場合、セキュリティソフトやGPO（グループポリシー）による制限が常に立ちはだかる。
- Late Binding（遅延バインディング）の徹底: `Early Binding`（参照設定）はバージョン差異によるコンパイルエラーを招く。`CreateObject`による`Late Binding`を基本とし、環境依存を排除せよ。
- 通信のタイムアウト制御: `WinHttp`の`.SetTimeouts`メソッドを必ず呼ぶこと。デフォルトのタイムアウト設定を放置すると、サーバー側の遅延でWord自体がフリーズし、ユーザーの生産性を破壊する。
—
4. チーフアーキテクトからの助言
Wordは「人間が読むためのインターフェース」であり、システム間連携には不向きだという意見がある。しかし、現場では「Wordで入力・承認し、システムに登録する」というフローが、最も抵抗感が少ない。
「WordをGUI画面（フォーム）として使い、裏側でJSONを生成してAPIへ送る」
このパラダイムシフトこそが、DXにおける真の自動化である。コードを書くときは、常に「この処理が10万行のドキュメントで実行された場合」を想定し、再帰処理やメモリリークの可能性を潰し込んでいくこと。
コードは嘘をつかない。君が書いたメモリ解放の一行が、明日の社内システムの安定を支える。健闘を祈る。
