Dim frm As UserForm
For Each frm In UserForms
Unload frm
Next frm


--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"dunnerca" wrote in message
...
I've searched all over and cannot find an example of coding that will
close
all open user forms. I'm thinking something like

For i = 1 To Controls("msforms").Count
Unload ?
Next

As you can see, that's a really rough estimate of what's needed.