Loop all table definitions in Database : TypeName « Data Type « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Data Type
  3. TypeName

Loop all table definitions in Database

 
Sub exaCheckTableDefs()
    Dim db As Database
    Dim tbl As TableDef
    Set db = CurrentDb
    Debug.Print db.TableDefs.Count
    For Each tbl In db.TableDefs
       Debug.Print tbl.Name & " - " & TypeName(tbl)
    Next
End Sub








Related examples in the same category

1.Use TypeName to get the object data type
2.Get the type name
3.Check the selection type
4.Get the type name of an array
5.Uses VBA's handy TypeName function to determine the data type of the FormulaTest variable
6.Returning the Active Window, Inspector, or Explorer