VBAからJavaアプリを安全に呼び出す方法【API経由連携】

Excel VBAとJavaアプリを安全かつ柔軟に連携させたい場面は多くあります。この記事では、VBAからJavaアプリをREST APIを通じて呼び出す方法を、Spring Bootを使ったJavaサーバ構築からVBAコードの実装までわかりやすく解説します。

目次
1. なぜAPI経由で連携するのか？
2. Java側：Spring BootでREST APIを構築
1. pom.xml（主要依存）
2. コントローラ（例：テキスト加工処理）
3. VBA側：APIを呼び出す
1. 参考コード（WinHttp使用）
4. セキュリティ対策
5. 応用例
6. まとめ

1. なぜAPI経由で連携するのか？

VBAから直接Javaアプリを起動する方法（Shell関数など）は簡単ですが、引数の扱いやエラーハンドリング、安全性に難があります。

REST APIを使えば

プロセスを分離できる（VBAはクライアント、Javaはサーバ）
ネットワーク越しの呼び出しも可能
セキュリティ（認証・暗号化）を追加しやすい

2. Java側：Spring BootでREST APIを構築

pom.xml（主要依存）

<dependencies>
  <dependency>
    <groupId>org.springframework.boot</groupId>
    <artifactId>spring-boot-starter-web</artifactId>
  </dependency>
</dependencies>

コントローラ（例：テキスト加工処理）

@RestController
@RequestMapping("/api")
public class ProcessController {

    @PostMapping("/process")
    public ResponseEntity<String> process(@RequestBody String input) {
        // Javaの処理
        String result = input.toUpperCase(); // 例：大文字変換
        return ResponseEntity.ok(result);
    }
}

3. VBA側：APIを呼び出す

参考コード（WinHttp使用）

Function CallJavaAPI(inputText As String) As String
    Dim http As Object
    Set http = CreateObject("WinHttp.WinHttpRequest.5.1")
    
    http.Open "POST", "http://localhost:8080/api/process", False
    http.SetRequestHeader "Content-Type", "application/json"
    http.Send """" & inputText & """"
    
    If http.Status = 200 Then
        CallJavaAPI = http.ResponseText
    Else
        CallJavaAPI = "Error: " & http.Status
    End If
End Function