Userform diparaît

[TheProdigy]

Bonjour,

Quand la feuille MAMA est masquée et que j'appuie sur l bouton pour l'afficher ça marche l'userform1 reste affiché. Maintenant que la feuille est affichée et que je rappuie sur le bouton pour me sélectionner la feuille MAMA l'userform disparaît 🙁.

Quelqu'un pourrait m'aider.

Merci

Private Sub cmdValiderOut_Click()
If Me.TextBox1 = "123" Then
    Sheets("MAMA").Visible = True
    MsgBox "Correct. La feuille MAMA est affichée"
    Unload Me
    Load UserForm1
    Sheets("MAMD").Select
Else
    MsgBox "Mot de passe incorrect. Réessayez!", vbCritical, "Attention"
    Me.TextBox1 = ""
End If
End Sub

Merci.

 

[gilbert_RGI]

Re : Userform diparaît

Bonjour,

Quand la feuille MAMA est masquée et que j'appuie sur l bouton pour l'afficher ça marche l'userform1 reste affiché. Maintenant que la feuille est affichée et que je rappuie sur le bouton pour me sélectionner la feuille MAMA l'userform disparaît 🙁.

Quelqu'un pourrait m'aider.

Merci

Private Sub cmdValiderOut_Click()
If Me.TextBox1 = "123" Then
    Sheets("MAMA").Visible = True
    MsgBox "Correct. La feuille MAMA est affichée"
    Unload Me
    Load UserForm1
    Sheets("MAMD").Select
Else
    MsgBox "Mot de passe incorrect. Réessayez!", vbCritical, "Attention"
    Me.TextBox1 = ""
End If
End Sub

Merci.

bonjour

que signifie "Unload Me" ne serait-ce pas une commande pour faire disparaitre l'userform ????? 😱

 

[Guest]

Re : Userform diparaît

Re,

J'ajouterai que

Load UserForm1

N'a jamais affiché de userform. Il se contente de le charger en mémoire.

A+

 

[TheProdigy]

Re : Userform diparaît

Oh merci infinimment.