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

petit pb de mise en forme

  • Initiateur de la discussion Florent
  • Date de début
F

Florent

Guest
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

 
@

@+Thierry

Guest
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

Guest
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
 
F

Florent

Guest
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

 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…