Run the userforms collection and displaying the form names

[J@b@r]

Hello,

I would like to run trough the forms collection and show the name of each form in a messagebox

I do not seem to be able to show the code name of te form on the screen.

Example:

private sub button1_Click()
dim myform as Userform

For each myform in Userforms

msgbox myform.name & vbcrlf & myform.caption

next myform

End sub