Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Utiliser un Label pour afficher des varaibles

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

syl0038

XLDnaute Junior
Bonjour à tous et par avance merci pour votre aide!
J'ai un probleme avec mon fichier excel car l'Userform 2 devrait afficher les valeurs rentre dans l userform 1.

Mais cela ne marche pas du premier coup, il faut que je retourne dans l userform 1 puis que je revalide pour que les données s affichent enfin dans l userform 2.

Merci de me dire qu elle est le probleme car je bloque vraiment.

Le but de l userform2 est d afficher les valueurs de l userform1 avant de les valider definitivement.
 

Pièces jointes

Re : Utiliser un Label pour afficher des varaibles

Re- bonjour

le code est à remplacer par celui-ci:
Code:
Private Sub CommandButton1_Click()

If ComboBox1.Value = "" Or _
   ComboBox2.Value = "" Or _
   ComboBox3.Value = "" Or _
   ComboBox4.Value = "" Or _
   TextBox1.Value = "" Or _
   TextBox2.Value = "" Or _
   TextBox3.Value = "" _
   Then
           MsgBox "VA RUGAM SA COMPLETATI TOATE CASUTELE"
   Else
          
            UserForm2.Label2.Caption = "Schimb : " _
            & vbCrLf & "" & vbCrLf & "Operator : " _
            & vbCrLf & "" & vbCrLf & "Utilaj : " _
            & vbCrLf & "" & vbCrLf & "Reper : " _
            & vbCrLf & "" & vbCrLf & "Total piese efectuate : " _
            & vbCrLf & "" & vbCrLf & "Rebut : " _
            & vbCrLf & "" & vbCrLf & "Minute lucrate  : " _
            & vbCrLf & "" & vbCrLf & "Operator 1 : " _
            & vbCrLf & "" & vbCrLf & "Operator 2 : " _
            & vbCrLf & "" & vbCrLf & "Operator 3 : " _
            & vbCrLf & "" & vbCrLf & "Operator 4 : " _
            & vbCrLf & "" & vbCrLf & "Actiune finalizata : "


            UserForm2.Label3.Caption = UserForm1.ComboBox1.Value _
            & vbCrLf & "" & vbCrLf & UserForm1.ComboBox2.Value _
            & vbCrLf & "" & vbCrLf & UserForm1.ComboBox3.Value _
            & vbCrLf & "" & vbCrLf & UserForm1.ComboBox4.Value _
            & vbCrLf & "" & vbCrLf & UserForm1.TextBox1.Value _
            & vbCrLf & "" & vbCrLf & UserForm1.TextBox2.Value _
            & vbCrLf & "" & vbCrLf & UserForm1.TextBox3.Value _
            & vbCrLf & "" & vbCrLf & UserForm1.TextBox4.Value
End If
UserForm2.Show

End Sub
à+
Philippe
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…