Reference TableDefs from DBEngine : DBEngine « Access « VBA / Excel / Access / Word






Reference TableDefs from DBEngine

 
Sub temp()
    Dim db As Database
    Set db = DBEngine(0)(0)
    Debug.Print "Table count: " & db.TableDefs.Count
End Sub

 








Related examples in the same category

1.Save table to a collection
2.Enumerate groups and users