UserForm schließen und andere anzeigen

[excl50]

Hallo zusammen,

ich möchte das sich duchfolgenden Code die aktuelle UserForm schließt und eine andere UserForm geöffnet wird.

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)

If CloseMode = 0 Then
    Unload Me
    UserForm_Hauptmenü.Show
End If

End Sub

Dabei wird die UserForm_Hauptmenü zwar geöffnet, die UserForm die über Unload Me angesprochen wird bleibt jedoch auch im Hintergrund geöffnet?

Vielen Dank im Voraus!

[Kuwer]

Hallo,

ersetze Unload Me durch Me.Hide.
Dadurch wird die UF ausgeblendet und nach Schließen von UserForm_Hauptmenü entladen.

Gruß Uwe

[excl50]

Hallo Uwe,

vielen Dank soweit klappt es.

Jetzt ergibt sich aber ein anderes Problem und zwar, wenn ich die UserForm, welche über Me.Hide angesprochen wird erneut öffne und versuche zu schließen
dann wird gar kein Ereignis mehr ausgelöst????

[Kuwer]

Hallo,

so vielleicht :

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)

If CloseMode = 0 Then
    Me.Hide
    UserForm_Hauptmenü.Show
    Unload Me
End If

End Sub

Gruß Uwe