Remplacer cell dest CA par 5.83 en VBA

Fermé
rvz Messages postés 35 Date d'inscription samedi 20 octobre 2007 Statut Membre Dernière intervention 8 octobre 2008 - 29 janv. 2008 à 21:40
rvz Messages postés 35 Date d'inscription samedi 20 octobre 2007 Statut Membre Dernière intervention 8 octobre 2008 - 30 janv. 2008 à 06:41
Bonjour,

Urgent et désespéré !!


Sheets("sept").Select
Selection.Replace What:="ca", Replacement:="5.83", LookAt:=xlWhole, _
SearchOrder:=xlByRows, MatchCase:=False

Cette macro permet de remplacer toutes les cellules dont la contenu est CA par 5.83.C'est bien mais ce n'est pas ce que je veux.

Ce que je veux c'est chercher toutes les cellules contenant CA mais remplacer la cellule a droite par 5.83,c'est à dire si CA est en a1 alors la cellule que l'on va remplacer est a2.

Je suis désespéré.J'ai une autre méthode mais elle prend du temps,bien trop de temps.

Pitié.Si vous avez une solution ??

RV

4 réponses

phil_232 Messages postés 286 Date d'inscription jeudi 6 décembre 2007 Statut Membre Dernière intervention 12 juin 2008 33
29 janv. 2008 à 22:27
"J'ai une autre méthode mais elle prend du temps,bien trop de temps."
c'est normqle. Excel n'est pas une base de données mais une feuille de calcul. bref tu dois parcourir toutes les cellules une par une et remplacer la cellule adjacente.
0
rvz Messages postés 35 Date d'inscription samedi 20 octobre 2007 Statut Membre Dernière intervention 8 octobre 2008
29 janv. 2008 à 23:08
Ok,mais ma solution est d'incrémenter des formules et ce n'est pas ce que je souhaite car le fichier est gros.
Donc si il existe une solution du type :
Sheets("sept").Select
Selection.Replace What:="ca", Replacement:="5.83", LookAt:=xlWhole, _
SearchOrder:=xlByRows, MatchCase:=False

Mais qui laisse CA et met dans la cellule à coté 5.83,merci de ma la communiquer svp
Parce que là je rame

RV
0
phil_232 Messages postés 286 Date d'inscription jeudi 6 décembre 2007 Statut Membre Dernière intervention 12 juin 2008 33
30 janv. 2008 à 02:20
la fonction de Replace est forte dans Office mais je crois que là tu demandes trop
0
rvz Messages postés 35 Date d'inscription samedi 20 octobre 2007 Statut Membre Dernière intervention 8 octobre 2008
30 janv. 2008 à 06:41
Ok,merci quand m^me

RV
0