Thanks for your help RealisticGraphics but no luck!
I tried your code in a doc with textboxes from
the control toolbox and the drawing toolbar but the
count was zero
I put your sub in the Private Sub Document_Open() sub
in my project and it didn't get called.
I then put it in new macros module of the normal project and called it from AutoOpen which called it but reported zero text fields
Do you know what I'm doing wrong?
Thanks again.