vba - VBA:シートのワークブックに特定の変数名付きシートをインポートして、テーブルにアクセスしますか?

Question

特定のタブを Access テーブルにインポートする方法を探しています。通常、私は TransferSpreadsheet タイプのコードを実行するので、これは私にとってかなり新しいものです。

ユーザーが任意のディレクトリからファイルを開くことができるようにする必要があります。その後、半変数名を持つことができる特定のスプレッドシートをプログラムにインポートさせます。

インポートする必要があるスプレッドシートは、常に「詳細」です。明らかに、ファイルには 7 月の詳細というタブが含まれています。したがって、このコードを使用した私のロジックは、LIKE (または *) Detail を含むスプレッドシートを見つけることでした。ただし、これが機能するかどうかはわかりません。また、TransferSpreadsheet に慣れているため、これを Access テーブルに転送する最善の方法もわかりません。どんな助けでも大歓迎です！

Dim wb1 As Workbook
Dim wb2 As Workbook
Set wb1 = ActiveWorkbook

ImportFileName = cmdFileDialog("Select File to Import: ")
Set wb2 = Workbooks.Open(FileName:=ImportFileName)

For Each Sheet In wb2.Sheets
        If Sheet.Name Like Detail Then
            Sheet.Copy After:=wb1.Sheets(wb1.Sheets.Count)
        End If
Next Sheet

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, DataTable, ImportFileName, True, DataRange

編集: 明確にさせてください:詳細を含むシートを見つけたら、必要なように Access テーブルにインポートする方法がわかりません。これが私の最後の問題です。