Microsoft Access 掲示板

Microsoft Access 掲示板

htmlファイルのインポートについての相談 / 3

6 コメント
views
4 フォロー
3
hatena 2022/12/01 (木) 23:52:25

あるいは、DoCmd.TransferText メソッドでも可能です。

DoCmd.TransferText メソッド (Access) | Microsoft Learn

通報 ...
  • 6
    hatena 2022/12/04 (日) 02:51:02 >> 3

    DoCmd.TransferText メソッドを使うなら、下記のような感じです。

    Private Sub コマンド1_Click()
    Dim htmlFileName As String
    htmlFileName = "C:\TEST\TEST.html"
    Dim InportTableNames As String
    InportTableNames = "Table,Table1,Table2" 'インポートしたいテーブル名をカンマ区切りで設定

    Dim tbl
    For Each tbl In Split(InportTableNames,",")
        DoCmd.TransferText acImportHTML, , tbl, htmlFileName, True, tbl
    Next
End Sub