Extract Table Properties with VBA 1

[ineedhelplease]

I am able to get the names of all the tables in my access database using the following VBA:

Dim lpTblDef As TableDef

With CurrentDb
For Each lpTblDef In .TableDefs

MsgBox lpTblDef.Properties("name")

Next lpTblDef
End With

I am not able to figure out how to get the modify date or create date for each table. Any help with this would be appreciated.

Thank you.

 

[dhookom]

You might want to try the undocumented msysobjects table. Create a query with SQL of:

SELECT msysobjects.name, msysobjects.DateCreate, msysobjects.DateUpdate
FROM msysobjects
WHERE (((msysobjects.name) Not Like "msys*") AND ((msysobjects.Type)=1));

Duane
Hook'D on Access
MS Access MVP