Ａｃｃｅｓｓ２０１０、TransferSpreadsheetの使用方法

Ａｃｃｅｓｓ２０１０は、手頃な価格で高機能のデータベースを簡単に作成できるソフトです。
Ａｃｃｅｓｓ２０１０にはオブジェクトとして、テーブル、クエリ、フォーム、レポート、マクロ、
モジュール（ＶＢＡ）が有ります。

しかし、Ａｃｃｅｓｓ２０１０でＶＢＡによるインポート方法が分からなかったので調べた所、
TransferSpreadsheetがありました。使用したパソコンは、下記のソフトを使用していました。

ＯＳ　　　　　　　：　Ｗｉｎｄｏｗｓ１０（６４ｂｉｔ）バージョン1803（ＯＳビルド 17134.829）
表計算ソフト　　　：　Ａｃｃｅｓｓ２０１０（３２ｂｉｔ）

以下、Ａｃｃｅｓｓ２０１０、TransferSpreadsheetの使用方法を記載して行きます。

（項目１）
　・ Ａｃｃｅｓｓ２０１０でＶＢＡによるインポート方法が分からなかったので調べた所、
　　TransferSpreadsheetがありました。
　・DoCmd.TransferSpreadsheet メソッド (Access) | Microsoft Docsを参照しました。

（項目２）
　・下図はエクセルのデータですが、この水色のセルをインポートする方法を記載します。
　　

（項目３）
　・データの１行目をフィールド名として使用する場合は、以下のコードを記述します。（Trueで指定）
　　Sub test1()
　　　　DoCmd.TransferSpreadsheet acImport, 10, "T1 データ", _
　　　　"C:\tips215.xlsm", True, "B4:G9"
　　End Sub

　・インポート結果は、以下の通りです。
　　

（項目４）
　・データの１行目をフィールド名として使用しない場合は、以下のコードを記載します。（ Falseで指定）
　　Sub test2()
　　　　DoCmd.TransferSpreadsheet acImport, 10, "T2 データ", _
　　　　"C:\tips215.xlsm", False, "B4:G9"
　　End Sub

　・次に、テーブルのデザインビューで、データ型とフィールドサイズを適切な設定にします。
　　

（項目５）
　・上記の方法は同名のテーブルが有ると、データの最後に追加されます。
　・新しくテーブルを作りたい場合は、下記のコードで同名のテーブルを予め削除して置きます。
　　DoCmd.DeleteObject acTable, "T1 データ"

（項目６）
　・以上で、Ａｃｃｅｓｓ２０１０、TransferSpreadsheetの使用方法は終了です。