mot de passe userform

[noon]

salut a tous
voila mon probleme

'userform1'
Private Sub CommandButton1_Click()
UserForm3.Show 'donc ici j appelle le userform3'
'A la suite de ca une macro qui efface des cellule'


le userform3 doit attendre que je mettre le mot de passe 1234
pour fermer cette fenetre et continuer la macro du userdorm1
si le mot de passe esf faux il ferme tout
mon probleme est qu avec le mot de passe ca marche bien
mais sans le mot de passe il attend
et si je le ferme avec la croix ; la macro du userform1 s execute quand meme
alors je ne sais pas !!!!!


''userform3'
Private Sub CommandButton1_Click()
If TextBox1.Value = "1234" Then
UserForm3.Hide
End If
Unload Me
End Sub