vbCrLf : écriture dans excel

Hello,

Dans mon programme VBA, j'ai une variable qui va contenir du texte. Ce texte sera formaté dans la variable comme suit :

Code:

---

selectioncase = selectioncase + vbCrLf + locStrChk

---

ensuite le contenu de la variable sera inscrit dans une cellule de mon fichier excel.

Remarque : lorsque le contenu s'inscrit dans ma cellule ca me donne ca :


Lu-03 (il y a un carré qui s'affiche à côté de chaque entité, mais là, on ne le voit pas) VOIR DOC ATTACHE

Lu-04

Lu-10

Question : est-il possible de formater la celllule de tel sorte que les carrés, générés par le vbCrLf dans ma variable, ne s'affiche pas de le fichier excel ??

merci et a bientot

bonjour
je suis pas sur que ca puisse t'aider mais j'ai trouvé ca dans un autre post:

Citation:

---

bonjour

pour supprimer le caractère de retour à la ligne du TextBox (carré blanc) , tu peux utiliser


Code :
Worksheets(Mafeuille).Range("B" & MaLigne) = _
Application.WorksheetFunction.Substitute(Myvalue1, vbCrLf, Chr(10))

bonne soiree
michel

---

voili voila
rémi

ca ne fonctionne guère :aie:

myvalue1 correspond a quoi ?

myvalue1 était la variable du prog de ce post dans laquelle il voulait enlever les carrés blanc
enfin je crois vu ce que j'y ai lu
pour toi ca donnerais qq chose comme ca:

Code:

---

Worksheets("nom de ta feuille").cells(i, j) = Application.WorksheetFunction.Substitute(selectioncase, vbCrLf, Chr(10))

---

j'ai pas testé par contre :oops:
rémi

je viens de tester et malheureusement ca ne fonctionne pas !!
mais merci deja pour ton aide ! c'est cool !

si jamais t'as du nouveau, n'hésite pas a me le dire :king:

a+

c'est bon enfaite, j'ai magouillé et trouvé !

Code:

---

Cellule(1, 4) = Application.WorksheetFunction.Substitute(selectioncase, vbCrLf, Chr(10))

---

ok parfait
sinon je viens de tester chez moi et j'obtenais un pb que quand dans le format de ma cellule je n'avais pas mis renvoyer à la ligne automatiquement pour ce que ca vaut
rémi