Max length of text values in all fields, Unique values for all fields

[tcb]

In analyzing a large flat table that will be built into a new database
that will be relational I'd like to write code that will do the
following, if it is possible.

1. Max length of text values in all fields, drop them in a new table.

lastname 33
firstname 27
etc

2. Unique values for all fields, output each field and values in a new
tables.

I'd like to have that output like this:

tbl_Ethnicity

AfAm
AfrAmerican
Af-Amer
etc

tbl_PhoneType

Home
Alt
Alternate
Current
WFax
WorkFax
etc

Knowing these things will help me create my new table structure and
determine what values I'll need in lookup tables.

 

[Allen Browne]

You can see how to loop through all the Fields in a table, listing their
names types, sizes, and descriptions here:
http://allenbrowne.com/func-06.html

To add them to a table, OpenRecordset, and AddNew with Update.