ExcelのVBAを使ってAPIにアクセスする方法

Excelはデータ分析やレポート作成に非常に強力なツールですが、外部APIからデータを取り込むことで、その機能をさらに拡張することができます。今回は、ExcelのVBAを使用してAPIにアクセスし、データを取得する基本的な方法を紹介します。

事前準備

Microsoft XML, v6.0ライブラリの設定
まず、APIとの通信に必要なMicrosoft XML, v6.0ライブラリをVBAに追加する必要があります。これは、VBE（Visual Basic for Applicationsエディタ）から簡単に設定できます。

Excelを開き、Alt + F11 キーを押してVBAエディタにアクセスします。
メニューバーから「ツール(T)」を選び、「参照設定(R)…」をクリックします。
「参照設定」ウィンドウで、「Microsoft XML, v6.0」を探し、チェックボックスをオンにします。
「OK」をクリックしてウィンドウを閉じます。
これで、VBAプロジェクトで必要なライブラリが利用可能になります。

APIデータの取得

サンプルVBAコード
次に、APIからデータを取得するためのVBAコードの例を以下に示します。このコードは、指定されたAPIからデータを取得し、結果をメッセージボックスで表示します。

Sub GetAPIData()
    Dim httpRequest As Object
    Set httpRequest = CreateObject("MSXML2.XMLHTTP.6.0")

    Dim url As String
    url = "https://api.example.com/data"  ' APIのエンドポイントURL

    httpRequest.Open "GET", url, False    ' HTTPリクエストを開く
    ' 必要に応じてヘッダーを設定
    ' httpRequest.setRequestHeader "Content-Type", "application/json"
    ' httpRequest.setRequestHeader "Authorization", "Bearer YOUR_ACCESS_TOKEN"
    httpRequest.Send                        ' リクエストを送信

    If httpRequest.Status = 200 Then
        Dim response As String
        response = httpRequest.responseText
        MsgBox response                     ' 応答を表示
    Else
        MsgBox "Error " & httpRequest.Status & ": " & httpRequest.statusText
    End If
End Sub

このコードは基本的なGETリクエストを行いますが、APIの種類や要件に応じてPOSTリクエストやヘッダーの追加など、カスタマイズが可能です。