Unloading /Closing all userforms

[dunnerca]

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.

 

[Bob Phillips]

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)

 

[Jim Cone]

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.

 

[Joel]

For Each frm In VBA.UserForms
Unload frm
Next frm

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