◆概要
　この資料は、Microsoft Accessで、DAOを利用してテーブルの情報を取得する方法について記載しています。


Name、DateCreated、LastUpdatedプロパティ

テーブルの名前を取得するには、TableDefsオブジェクトのNameプロパティを参照します。テーブルの作成日を取得するには、DateCreatedプロパティ、テーブルの更新日時を取得するには、LastUpdatedプロパティを参照します。

Function GetTableInfo()
    Dim db As Database
    Dim T As TableDef
    Dim TName As String
    
    Set db = CurrentDb()
    Set T = db.TableDefs("M02郵便番号")
    TName = T.Name
    'MsgBox TName & "の作成日:" & T.DateCreated
    MsgBox ("テーブル名:" & TName & vbNewLine & _
        "作成日:" & T.DateCreated & vbCrLf & vbNewLine & _
        "レコード数" & T.RecordCount & vbCrLf & vbNewLine & _
        "更新日" & T.LastUpdated)
            
End Function

　参照　DAOを使用するには、DAOタイプライブラリへの参照を確立する必要があります。Microsoft DAO 3.x Object Library に参照設定をしてください。