Discussion :

[Eric93]

Bonjour,

Comment ajouter des caractères spéciaux dans une chaîne ?

En l'occurence j'aimerai ajouter un retour à la ligne

Merci

[tirex28]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Machaine = Machaine & vbNewLine

Cordialement,

Tirex28/

[Eric93]

Merci, je viens d'essayer,

Le problème c'est qu'après, quand j'affecte ma chaîne à une cellule il me met automatiquement l'option "Revenir à la ligne automatiquement" ce qui fait que ma chaine ne viens pas à la ligne uniquement à la position que j'ai choisi mon ajustement de longueur de colonne n'est plus bon

[tirex28]

Bonjour,

Pour rétablir le format de la cellule:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveCell.WrapText = False

Cordialement,

Tirex28/

[Eric93]

Si je met ca il me supprime également le retour à la ligne que j'ai mis.

Je trouve pas le moyen d'avoir un retour à la ligne à l'endroit ou je le désire

[LeForestier]

Bonjour,
essaye avec...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub MyMacro()
Dim a$
    a$ = "Essais pour ligne" & vbCrLf
    a$ = a$ & "Essais des deux genres de largeur" & vbCrLf
    a$ = a$ & "Ligne 3" & vbCrLf
    a$ = a$ & "Petit"
    Cells(1, 1) = a$
End Sub

Remarque: la largeur colonne doit être au moins égale à la plus longue ligne.
A+