質問: Dir() Next ``` ### 疑問点 ここまでは、記述できたのですが、奇数位置のクエリの内容を出力する場合は、RecordSetで奇数位置のクエリを開いて 奇数位置のクエリの内容 → 2次元配列 → Excelのシートという処理でよろしかったでしょうか? それとも別のシンプルなやり方でしょうか? 今回の処理では、0番目と1番目、2番目と3番目、4番目と5番目...というExcelファイルにしたいです。
回答: ``` DoCmd.TransferSpreadsheet acExport, 10, QName(i * 2 + 1), Path & EName(i), True, "" ``` この1行を追加するだけで解決しました。 ありがとうございました。