Passage à la ligne

[Cyril]

Bonjour
Je trouve votre forum très bien. Y a plein de chose dedans.

J'ai un Userform avec un TextBox dessus et un bouton.
Quand je click sur le bouton, je voudrais qu'il copie le text dans la cellule C10 et surtout j'aimerais que les passages à la ligne n'apparaisse pas dans la cellule.

Merci de votre aide.

 

[Eric C]

Bonjour le forum
Bonjour Cyril

Private Sub CommandButton1_Click()
Range("C10").Value = TextBox1.Value
End Sub
Voici pour la 1ère partie quant à la seconde, je ne saisi pas trop.
En attendant de plus amples explications.
Bon week-end à toutes & à tous
@ ++ Eric C

 

[CHti160]

Salut"Cyril "et "Eric C "
Bonsoir le "FORUM"
pour la deuxième question en ajoutant
Private Sub CommandButton1_Click()
Range("C10").Value = TextBox1.Value
Range("C10").Columns.AutoFit <-------'cela adapte la cellule à la longueur du texte
End Sub
peut être l'action désirée
A+++
Jean Marie

 

[Cyril]

Merci CHtil60 pour la réponse.
Seulement je c pas si vous zavé remarqué que lorsque ds le TextBox on passe a la ligne ben ca laisse un symbole de passage a la ligne ds la cellule et c cela ke j'aimerais effacer.
Si vous voyez ske jve dire 🙂 !
Mé bon !

Bon Week end a tous !

 

[Bibine]

ching chong pr moi! mais ce site a l'air pratique pr les ti soucis de programmation ou autre

 

[michel]

bonsoir Cyril , Eric et Jean-Marie

j'espere qu'une de ces deux solutions pourra t'aider

supprimer les symboles du saut de ligne :
Range("C10") = Application.WorksheetFunction.Substitute(TextBox1, vbCrLf, Chr(10))

afficher le Textbox sur une ligne
Range("C10") = Application.WorksheetFunction.Substitute(TextBox1, vbCrLf, "")


bonne soiree
MichelXld

 

[Cyril]

Bonjour à tous !

Merci michel pour ta réponse elle fonctionnne, c'est exactement ce que je cherchais à faire.

Encore merci 🙂