Excel VBAでPower Queryを経由して、JSON形式のファイルの値をExcelのテーブルに展開するマクロを、VBAとM言語を用いて以下の条件に従って作ってください。

# 条件
1. 読み込み元のJSON形式のファイル data.json と読み込み先ブック（マクロを動かしているブック）は同じフォルダにある
2. data.json のデータ構成は次のとおりとする
   - id
   - question
   - a
   - b
   - c
   - d
   - correct
   - example
   - translation
3. data.json のデータは次のとおりExcelのテーブルに展開する
   - id → ID
   - question → 問題
   - a → a
   - b → b
   - c → c
   - d → d
   - correct → 正解
   - example → 例題
   - translation → 翻訳
4. M言語はArray関数でバリアント型変数に代入し、Join関数でvbCrLfを区切り文字にして結合する
5. M言語を格納する配列は、1要素につき1ステップとする
6. 関数の引数が複数行になる場合は、1要素内で記述する
7. VBAの行継続文字を減らすため、M言語の1ステップは可能な限り1つの文字列として記述する
8. データの展開先はマクロを動かしているブックの「Sheet1」とする
9. ブックに追加する新規クエリの名前は JSON読み込み とする
10. 新たに展開するテーブルは、テーブル名を T_TOEIC とし、セルA1を基点に展開する
11. 処理後にWorkbookConnectionとクエリを削除する
12. data.jsonが見つからないといったエラー処理は一切考慮せずに極力シンプルなマクロにする
