Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Comment lire un commentaire AVEC les sauts de ligne

Comment lire un commentaire AVEC les sauts de ligne

3 réponses
Avatar
Jean-Luc GARNIER
Bonjour,

Je cherche à parser une chaine issue d'un commentaire et j'ai besoin de
détecter les sauts de ligne. Le code suivant ne marche pas car il semble que
le commentaire soit filtré au moment de la lecture:

sepPos = InStr(1, vbCR, Sheets("TEMPLATE").Cells(9, 3).value, vbBinaryCompare)

setPos vaut systématiquement 0, car la valeur lue est dépourvue de CR/LF...
Comment faire ?

Merci d'avance pour toute aide !

--
Jean-Luc, Auriol, FRANCE
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Daniel.C
Bonjour.
sepPos = InStr(1, Sheets("TEMPLATE").Cells(9, 3).Value, Chr(10))
Cordialement.
Daniel
"Jean-Luc GARNIER" <jean-luc.garnier(at)gemalto.com> a écrit dans le message
de news:
Bonjour,

Je cherche à parser une chaine issue d'un commentaire et j'ai besoin de
détecter les sauts de ligne. Le code suivant ne marche pas car il semble
que
le commentaire soit filtré au moment de la lecture:

sepPos = InStr(1, vbCR, Sheets("TEMPLATE").Cells(9, 3).value,
vbBinaryCompare)

setPos vaut systématiquement 0, car la valeur lue est dépourvue de
CR/LF...
Comment faire ?

Merci d'avance pour toute aide !

--
Jean-Luc, Auriol, FRANCE


Avatar
Jean-Luc GARNIER
Mille mercis, c'était bien ça !!

--
Jean-Luc, Auriol, FRANCE


"Daniel.C" wrote:

Bonjour.
sepPos = InStr(1, Sheets("TEMPLATE").Cells(9, 3).Value, Chr(10))
Cordialement.
Daniel
"Jean-Luc GARNIER" <jean-luc.garnier(at)gemalto.com> a écrit dans le message
de news:
Bonjour,

Je cherche à parser une chaine issue d'un commentaire et j'ai besoin de
détecter les sauts de ligne. Le code suivant ne marche pas car il semble
que
le commentaire soit filtré au moment de la lecture:

sepPos = InStr(1, vbCR, Sheets("TEMPLATE").Cells(9, 3).value,
vbBinaryCompare)

setPos vaut systématiquement 0, car la valeur lue est dépourvue de
CR/LF...
Comment faire ?

Merci d'avance pour toute aide !

--
Jean-Luc, Auriol, FRANCE







Avatar
Corto
Bonjour Jean-Luc GARNIER,
Juste pour information CHR(10) correspond à vbLF

Corto

Mille mercis, c'était bien ça !!