[VBA] Retour chariot dans une TextBox

Résolu
thesentry Messages postés 1092 Statut Membre -  
thesentry Messages postés 1092 Statut Membre -
Bonjour,

Sur un UF, j'ai 3 TextBox dont 2 qui sont verrouillées (la 1 et la 3).
La première affiche un récapitulatif de ce qui a été saisi par l'utilisateur dans les UF précédents.
La 2 permet d'insérer un commentaire libre.
La 3 permet de faire un récapitulatif de ce qui est écrit dans la 1 et la 2.
Je n'ai pas trouvé comment mettre à jour automatiquement la 3 quand on ajoute un commentaire libre dans la 2. J'ai donc créé un bouton "MAJ" avec le code suivant :

Private Sub CommandButton1_Click()
Conclusion.TextBox3 = Conclusion.TextBox1.Value & char(13) & Conclusion.TextBox2.Value
End Sub

J'ai trouvé le char(13) sur internet pour un retour chariot mais ça ne marche pas (peut être est-ce que pour les MsgBox...).

Ce que je cherche à faire : dans la TextBox3, mettre sur une ligne la TextBox 1, faire un retour chariot et mettre sur une seconde ligne ce qu'il y a dans la TextBox2.

Une idée ? Merci

1 réponse

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    marche pas avec textbox, prendre label ou richtextbox

    Private Sub CommandButton1_Click()
    Label1.Caption = Me.TextBox1 & vbNewLine & Me.TextBox2
    'ou avec control supplementaire
    RichTextBox1 = Me.TextBox1 & vbNewLine & Me.TextBox2
    End Sub
    0
    1. Polux31 Messages postés 7219 Statut Membre 1 204
       
      Bonjour f894009,

      Ça fonctionne avec textbox. Il faut mettre la propriété MultiLine à True.

      ;o)
      0
    2. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
       
      Bonjour,

      Ok, merci pour l'info
      0