Version imprimable
J'ai une feuille Excel, toutes les cellules de la colonne B sont remplies par du texte avec le même format.
Je voudrais remplacer, en VBA, un mot particulier de chaque cellule par un paragraphe que je lie dans une autre feuille(utilisation de la fonction Replace).
Le problème est :
Comment utiliser la fonction Replace(ou une autre) pour remplacer le mot par le paragraphe et surtout, lors du remplacement, garder le format du paragraphe ?
Merci de votre réponse.
Bonjour
Ton paragraphe est une cellule ou un ensemble de cellules
Dans le premier cas, une simple copie de cellules suffit:
Dans le deuxième, tu peux concaténer tes cellules en mettant un chr(13) -> retour chariot, entre chaque cellulesCode:worksheets(1).cells(A,B)=worksheets(2).cells(X,Y)
Slts
Bonjour,
Peux-tu nous donner ce que tu as essayé de faire avec la fonction Replace, ce que cela te donne.
Ce sera mieux pour t'aider à trouver une solutionhttp://freelog.chez.tiscali.fr/emoti.../pensif_28.gif
Starec
Comme je l'ai précisé dans mon message, j'ai par exemple dans la feuille1 dans la cellule C5 le texte "TOTO est parti à la pêche". Je voudrais remplacer, par exemple, le mot "parti" par un texte(contenant des sauts de ligne) contenu dans la cellule D7 de la feuille2. Lors de la copie on garde le format du texte copiè sans modifier le format du reste du texte de la cellule C5.
progpro
bonsoir,
Première constatation, il n'est pas possible de mettre différente police ou couleur dans une même cellule.
2°) Le texte que tu à dans D7 n'a probablement pas de saut de ligne, le renvoi a la ligne dépend de la largeur de la colonne. A moins d'une astuce.. par VBA. mais dans ce cas les sauts de lignes serront garder.
Mettre le contenu de C5 dans une variable (ex: a$)
Mettre le contenu feuil2- D7 dans autre variable (ex:b$)
Pour trouver "Parti" voir du côté de la fonction Instr() CF:Aide
e=instr(1,a$,"parti") : donne 10
a$=left(a$,e-1) & b$ & mid(a$,e+6)
feuil1.select
range("C5").value=a$
Voila petit exemple a ajuster
A+
Bonjour
Je ne sais pas quelle version d'excel tu utilises LeForestier, mais avec excel 2003, on peut avoir des couleurs et des polices différentes dans une cellule.
progpro, si garder le format est uniquement les sauts de ligne, la fonction Replace fonctionne. Par contre, s'il s'agit de garder les couleurs et la police, la je n'ai pas trouvé de solution.
Merci pour votre réponse qui répond en partie à mon problème.Je voudrais savoir s'il y a un moyen simple pour garder le format du texte copié.
Ci-joint mon exemple.
Merci de votre réponse
Citation:
Envoyé par LeForestier
Effectivement c'est mon problème. Je voudrais garder les couleurs et la police du texte copié.
Citation:
Envoyé par jfontaine
Bonjour,
Autant pour moi, j'ai excel 2000 :mouarf: et je viens encore d'essayé et pas possible de mettre un retour à la ligne dans une cellule, mais je n'avais qu' a moitié tord car dans ton exemple si j'élargi la colonne le mot vacance se met sur la 1ére ligne.
Mais si je rentre une variable avec des CR le texte est renvoyé à la ligne, d'ou ma supposition d'astuce :?
Désolé pour ce contretemps.
A+
Tiens, curieux...Citation:
Envoyé par LeForestier
Je viens de faire l'essai sur Excel 97 et je n'ai pas de problème.
Il faut savoir que le saut de ligne dans une cellule est le caractère VbLf - Chr(10).
D'accord, mais en formatant la variable par du VBA et non à l'entrée par la cellule ou la barre de formule, et j'ignore comment rentrer un CR au moyen du clavier ? :?Citation:
Envoyé par AlainTech
A+
Dans une cellule Excel:Citation:
Envoyé par LeForestier
Alt + Enter 8-)