No one has any ideas?
This really seems needed as Access Design View requires you to click on each field name to see it's size, type and properties. This makes it hard to compare two similar tables/databases side-by-side.
JL,
How'd we miss you? You can iterate through all of the tables, and print the schema stuff like so:
Private Sub CheckTables()
Dim tdf As DAO.TableDef
Dim fld As DAO.Field
For Each tdf In CurrentDb.TableDefs
Debug.Print tdf.Name
For Each fld In tdf.Fields
Debug.Print fld.Name
Debug.Print fld.OrdinalPosition
Debug.Print fld.Type
Debug.Print fld.Size
Next
Next
End Sub
Of course, you would want to omit the system files (MSys*); etc.
I'd probably throw all of the info into a table and just do a simple little report...
Tranman
"Adam was not alone in the Garden of Eden, however,...much is due to Eve, the first woman, and Satan, the first consultant." Mark Twain
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.