[AccessD] change all fields to Allow Zero Length via VBA

Good Morning to the list,

I find myself with 2 new tables I imported from Excel with over 321 fields.
All fields are text 255.
I don't think I can face manually changing all of them to "Allow Zero Length
String".

In the archives I could not find a way to do so easily.
Some thing like iterate thru all the fields in the table via DAO, changing
the property....

Any code out there?

A2K

TIA

Bob Heygood