Reprise du message précédent :

Toutes les lignes "normales" se finissent pas VD? Ou par une liste de valeurs finie?

Option Explicit
Dim str, str2, reg
str = """titi"",""va"",""à"",""la" & vbCrLf & _
      """,""piscine avec ces """"amis""""" & vbcrlf & _
      """toto"",""va"",""à"",""la"",""plage"""
msgbox(str)
Set reg = new RegExp
'reg.Pattern = "[\^,""]""[^""]*([\r\n])[^""]*""[\$,""]"
reg.pattern = "([\^,""]""[^""]*)\r\n([^""\r\n]*""[\$,""])"
reg.Global = True
str2 = reg.Replace(str, "$1<br/>$2" )
msgbox(str2)

A vue de nez je dirais que le moteur de regex sur ton truc ça doit être POSIX et pas PCRE, du coup si (ça marche et)  il eut s'en servir en php il faut utiliser ereg_* et pas preg_*

 
ouais nan, là je te vois arriver, va te cacher

 
j'y ai déja pensé mais c'est un peut bourrain non?

Bah si toutes tes lignes finissent par VD, la solution est bien plus simple.

c'est pas bourrin, il y en a pour 2 secondes et ça résoud tous les cas de figures ( via la 1ere regex que j'ai filé d'ailleurs, celle qui se basait sur le fait que les lignes se terminaient par un ; ).

ouais mais c'est plus générique, c'est le mal
 
parcequ'avec un truc généric, il se fait ensuite une petite libre "déboucheur de CSV bouché.inc" et hop ! il ne se pose plus jamais la question. alors que si on commence à écrire des règles basées sur des plans sur la comètes et du spécifique, va carrément falloir appeler "SOS fosse sceptique bouchée" à chaque fois

j'ai pas le contrôle des données sur la dernière colonne donc voila ca va pas...

sinon, là mon code, marche, mais le "global" il s'en bat les coucougnettes. pige pas pkoi
du coup il ne remplace que la première ligne et basta

Simoes: Toutes les lignes commencent par des chiffres suivis d'un ; ???

c'est pas comme si je t'avais pas expliqué pourquoi ...
Je l'a refait, admettons ta pattern est "A B" ou "B C" ou "C D"
et ta phrase c'est A B C D
L'application de ta regex va donné ça:

• "A B" matché, je passe au reste
• "C D" matché, j'ai fini.

le morceau "B C" n'est pas matché, car il fait partie de deux autres matchs

ça marche ?
remarques :
- un seul " dans une classe de caractère, ça suffit
- pas de quantificateur pour 2 classes sur 4, c'est normal ?
 
EDIT: correction quotemsg

Option Explicit
 
Dim str, reg
 
str = """titi1"",""va"",""à"",""la" & vbCrLf & """,""piscine""" & vbcrlf & _
      """titi2"",""va"",""à"",""" & vbCrLf & "la"",""piscine""" & vbcrlf & _
      """titi3"",""va"",""à"",""l" & vbCrLf & "a"",""piscine""" & vbcrlf & _
      """titi3"",""va"",""à"",""l" & vbCrLf & vbCrLf & "a"",""piscine""" & vbcrlf & _
      """" & vbCrLf & "titi4"",""va"",""à"",""la"",""piscine""" & vbcrlf & _
      """titi5"",""va"",""à"",""la"",""piscine" & vbCrLf & """" & vbcrlf & _
      """" & vbCrLf & "titi6"",""va"",""à"",""la"",""piscine avec ces """"amis""""""" & vbcrlf & _
      """" & vbCrLf & "titi7"",""va"",""à"",""la"",""piscine avec ces """"amis""""""" & vbcrlf & _
      "EOF"
msgbox(str)
 
Set reg = new RegExp
 
reg.pattern = "([\r\n,""]""[^""]*)\r\n([^""]*""[\r\n,""])"
reg.Global = true
 
do while (reg.test(str))
    str = reg.Replace(str, "$1<br/>$2" )
loop
 
msgbox(str)

=> Ca, ça fonctionne dans 99% des cas.
 
Je le fait merder que dans un seul cas : la dernière ligne, avec titi7
=> La ligne précédente se termine avec """ qui contient "". Hors, "" suivient de \n est considéré par la regexp comme un saut de ligne à échapper. Il faudrait donc modifier la regexp pour ne fait cet échappement que si la série de " est paire.