petit pb de mise en forme

[Florent]

Bonjour le forum,

J'ai dans un userform un textbox qui me sert à entrer du texte dans une cellule.
Seulement j'ai un petit souci de mise en forme .
J'ai fait ,par les propriétés de la textbox, le necessaire pour le multiligne, le retour à la ligne, bref cela marche bien .

Mon pb arrive en suite, quand je regarde ma cellule ou est inscrit le texte , à chaque fois que j'ai été à la ligne , j'ai un carré qui s'affiche .

Je souhaiterai savoir si il est possible d'éviter cela et comment car je n'arrive pas à trouver d'ou vient le pb

Merci d'avance de la reponse que vous pourrez m'apporter

Florent

 

[michel]

Re: petit pb de mise en forme textbox multilignes

bonsoir Florent

le lien ci dessous pourra peut etre t'aider

Lien supprimé


bonne soiree
michel

 

[@+Thierry]

Salut Florent, le Forum

Pour le Caractère de retour chariot il faut faire un subterfuge...

Admettons que tu envoies tes données deuis un CommandButton1 dans le UserForm, voici ce qu'il faut faire :

Private Sub CommandButton1_Click()
Dim LeTexte As String
LeTexte = TextBox1
LeTexte = Application.WorksheetFunction.Substitute(LeTexte, vbCrLf, Chr(10))
Sheets("Feuil1").Range("A1") = LeTexte
End Sub

Bonne Soirée
@+Thierry

 

[@+Thierry]

Hello Michel, re Florent

Et bien on s'est croisé, en fait tu envoies exactement là où j'ai mis le même code !! lol

Bonne Soirée (pluvieuse sur la cote !!)
@+Thierry

 

[michel]

bonsoir @+Thierry

j'ai dirigé Florent vers une source fiable ...;o)
on ne fait pas mieux que tes demos


bonne soiree
michel

 

[Florent]

Bonsoir Thierry, Michel, le Forum,

Un grand MERCI à tous les deux. Je viens d'integrer ce petit bout de codes dans mon projet , cela marche nickel.

Enfin , je devrai dire notre projet car c'est grace à vous aussi que j'avance

A+

Florent