Bonjour,
J'ai un petit soucis. Je n'arrive pas à transmettre l'information de la TextBox aux Label.
Quand je teste le texte s'affiche au deuxième essaie, et ce même je change de mot entre temps.
Voici le code de mon UserForm ("MENUConnexion")
Dans mon UserForm ("MENUGeneral") je n'ai que le label ("LabelUser") pour le moment
J'ai un petit soucis. Je n'arrive pas à transmettre l'information de la TextBox aux Label.
Quand je teste le texte s'affiche au deuxième essaie, et ce même je change de mot entre temps.
Voici le code de mon UserForm ("MENUConnexion")
VB:
Private Sub CommandButton1_Click()
On Error Resume Next
'Définition des variables
Dim MdP As String
'Configuration des variables
MdP = WorksheetFunction.VLookup(Text_User, Sheets("User").Range("A:C"), 2, 0)
'Si la recherche V de la configuration est correct
If Text_Mdp = MdP Then
MENUGeneral.Show
MENUGeneral.LabelUser.Caption = Me.Text_User.Text
Unload Me
'Si la recherche V ne correcpond pas
Else
MsgBox "erreur"
End If
End SubDans mon UserForm ("MENUGeneral") je n'ai que le label ("LabelUser") pour le moment