List table types : Table Properties « Access « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Access
  3. Table Properties

List table types

 
Sub ListTables()
    
    Dim cat As New ADOX.Catalog
    Dim tbl As ADOX.Table
    
    cat.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
       "Data Source=C:\mydb.mdb;"
    
    For Each tbl In cat.Tables
       Debug.Print tbl.Name, tbl.Type
    Next
End Sub








Related examples in the same category

1.Listing Table Properties
2.Checking for Existence of Tables
3.Check table definition
4.Get Table documents
5.Table documents