Microsoft Access 掲示板

Microsoft Access 掲示板

エクセルの複数シートのインポート / 2

5 コメント
views
4 フォロー
2
hatena 2023/05/05 (金) 10:51:14

例えば、data、aaa、bbb の固定なら、

     DoCmd.TransferSpreadsheet acImport, _
                    acSpreadsheetTypeExcel12Xml, "T_2022", varxls, ,"data!A7:I"
     DoCmd.TransferSpreadsheet acImport, _
                    acSpreadsheetTypeExcel12Xml, "T_2022", varxls, ,"aaa!A7:I"
     DoCmd.TransferSpreadsheet acImport, _
                    acSpreadsheetTypeExcel12Xml, "T_2022", varxls, ,"bbb!A7:I"

とシート数分記述すればいいでしょう。

シート数が多い場合は、シート名を配列に格納して、Fprループで繰り返すようにすれば短くできます。

シート名か固定でなく、事前にシート名か分からないなら、TransferSpreadsheet では無理なので、VBAでExcelアプリケーションを開いて処理することになります。

AccessからExcelを操作する 《CreateObject》｜Access｜ヘルプの森

通報 ...