chantalou78
XLDnaute Nouveau
Bonjour,
J'ai une macro ci-après (Cells.Replace What:=";", Replacement:=Chr(10), LookAt:=xlPart, SearchOrder:=xlByRows)
pour mettre à la ligne le texte séparé par un point virgule.
1- Je souhaiterai que cette macro fonctionne dans tous les classeurs que je pourrai avoir à ouvrir, pouvez vous m'aider ?
2- Aussi, je souhaiterai que la macro fonctionne si le texte est séparé par un point, une virgule, un tiret ...
j'ai essayé de changé dans le code >> Cells.Replace What:="-", Replacement:=Chr(10), LookAt:=xlPart, SearchOrder:=xlByRows
Cela n'a pas fonctionné ?
En vous remerciant par avance de votre aide
J'ai une macro ci-après (Cells.Replace What:=";", Replacement:=Chr(10), LookAt:=xlPart, SearchOrder:=xlByRows)
pour mettre à la ligne le texte séparé par un point virgule.
1- Je souhaiterai que cette macro fonctionne dans tous les classeurs que je pourrai avoir à ouvrir, pouvez vous m'aider ?
2- Aussi, je souhaiterai que la macro fonctionne si le texte est séparé par un point, une virgule, un tiret ...
j'ai essayé de changé dans le code >> Cells.Replace What:="-", Replacement:=Chr(10), LookAt:=xlPart, SearchOrder:=xlByRows
Cela n'a pas fonctionné ?
En vous remerciant par avance de votre aide