Discussion :

[nocontrol]

Salut,

J'ai un petit soucis, je voudrais faire un retour à la ligne dans ma chaine de caractère "lrootcausedesctextValue" lorsqu'il y a un ". " dans celle-ci.
J'arrive bien à passer les valeurs dans Tableau(V) mais je n'arrive pas a faire un saut de ligne pour tout avoir dans "lrootcausedesctextValue2"
Quelqu'un peut-il m'aider si il vous plait?

Code :

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

1
2
3
4
5
6
7
8
9
10
 
Dim Tableau() As String
Dim V As Integer
 
Tableau = Split(lrootcausedesctextValue, ". ")
 
    For V = 0 To UBound(Tableau)
 
         lrootcausedesctextValue2 = lrootcausedesctextValue2 + Tableau(V) & chr13
    Next V

[jfontaine]

Bonjour,

J'utiliserais plutôt Replace

Code :

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

1
2
str = "maphrase comporte un point. Retour à la ligne"
str = Replace(str, ". ", "." & Chr(13))

[nocontrol]

Merci pour la réponse, ça marche !