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.

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.

Something like this...

lngCount = UserForms.Count
If lngCount 0 Then
For N = lngCount To 1
Unload UserForms(N - 1)
Next
End If
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware
(Excel Add-ins / Excel Programming)




"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.

For Each frm In VBA.UserForms
Unload frm
Next frm

You can get the names of each of the forms using frm.name

"dunnerca" wrote:

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.