à la fois sauter la ligne et underline

[pedram0080]

Bonjour tout le monde,

tout à l'heure grâce à "MAPOMME" on a créé un userform mais pour finaliser mon projet il reste encore quelques petites modifications, voici ce que je veux faire.
quand on double clique sur un cellule on a un userform je veux que les valeurs des champs TXT soient en deux lignes différentes dans la coolonne B et séparées par une souligne dans la colonne A.

une image et un fichier sont en pièce jointe.

Merci et Bonne fête.

 

[phlaurent55]

Re : à la fois sauter la ligne et underline

Bonjour pedram,

Remplace ton code par celui-ci

Private Sub CommandButton1_Click()
Cells(Selection.Row, 1) = TextBox3 & "_" & TextBox4
Cells(Selection.Row, 2) = TextBox3 & vbLf & TextBox4
If OptionButton1 Then Cells(ActiveCell.Row, 1).Font.Size = 14
If OptionButton2 Then Cells(ActiveCell.Row, 1).Font.Size = 20
Unload Me
End Sub

à+
Philippe

 

[pedram0080]

Re : à la fois sauter la ligne et underline

Merci infiniment...