他のMDBファイルのテーブル名一覧を取得 : Access

AccessではこのVBA自体がMDBファイルになりますが、別のMDBファイルを参照したい場合もあります。

別のMDBファイルを開くには、OpenDatabaseメソッドを使用します。
ここではテーブル名の一覧を取得します。



BackHome BackTipsへ Backメニューへ

■ Access VBA 実行コード
Option Compare Database
Option Explicit

Private Sub コマンド0_Click()
    Dim DB As Database
    Dim tdf As TableDef
    '別のMDBファイルを開く
    Set DB = OpenDatabase("C:\test.mdb")
    For Each tdf In DB.TableDefs
        'テーブル名を取得
        Debug.Print tdf.Name
    Next
    'データベースを閉じる
    DB.Close
    Set DB = Nothing
End Sub



BackHome BackTipsへ Backメニューへ

Copyright(C) FeedSoft