Bonjour
Auriez vous une astuce : je voudrais remplacer dans des formules tel
que =3DA5*1 par =3DA5*0
contraintes c'est que mes formules ne sont jamais au m=EAme endroit :
en A10 j'ai =3DA5*1
et en A15 j'ai =3DA11*1 etc.....
Je voulais faire une edition remplace *1 par *0 mais cela ne marche
pas bien entendu
En esp=E8rant avoir =E9t=E9 clair
Merci =E0 vous
Attention, la procédure recherche ces caractères *1 pour les remplacer par *0. La question que tu dois te poser : Est-ce que cela risque d'affecter d'autres cellules qui ont aussi la séquence de caractères *1 dont tu ne veux pas toucher ?
'-------------------------------------- Sub test() With Worksheets("Feuil1") 'Nom feuille à adapter With .Range("A1:A10") 'Plage à adapter .Replace what:="~*1", Replacement:="*0", lookat:=xlPart End With End With End Sub '--------------------------------------
"celtic77" a écrit dans le message de groupe de discussion :
Bonjour Auriez vous une astuce : je voudrais remplacer dans des formules tel que ¥*1 par ¥*0 contraintes c'est que mes formules ne sont jamais au même endroit : en A10 j'ai ¥*1 et en A15 j'ai ¡1*1 etc..... Je voulais faire une edition remplace *1 par *0 mais cela ne marche pas bien entendu En espèrant avoir été clair Merci à vous
Bonjour Celtic77,
En macro, cela donnerait :
Attention, la procédure recherche ces caractères *1
pour les remplacer par *0. La question que tu dois te
poser : Est-ce que cela risque d'affecter d'autres
cellules qui ont aussi la séquence de caractères *1
dont tu ne veux pas toucher ?
'--------------------------------------
Sub test()
With Worksheets("Feuil1") 'Nom feuille à adapter
With .Range("A1:A10") 'Plage à adapter
.Replace what:="~*1", Replacement:="*0", lookat:=xlPart
End With
End With
End Sub
'--------------------------------------
"celtic77" <celtic77@aliceadsl.fr> a écrit dans le message de groupe de discussion :
b7313896-9bca-4e69-a257-5d9dbd20c429@f33g2000vbm.googlegroups.com...
Bonjour
Auriez vous une astuce : je voudrais remplacer dans des formules tel
que ¥*1 par ¥*0
contraintes c'est que mes formules ne sont jamais au même endroit :
en A10 j'ai ¥*1
et en A15 j'ai ¡1*1 etc.....
Je voulais faire une edition remplace *1 par *0 mais cela ne marche
pas bien entendu
En espèrant avoir été clair
Merci à vous
Attention, la procédure recherche ces caractères *1 pour les remplacer par *0. La question que tu dois te poser : Est-ce que cela risque d'affecter d'autres cellules qui ont aussi la séquence de caractères *1 dont tu ne veux pas toucher ?
'-------------------------------------- Sub test() With Worksheets("Feuil1") 'Nom feuille à adapter With .Range("A1:A10") 'Plage à adapter .Replace what:="~*1", Replacement:="*0", lookat:=xlPart End With End With End Sub '--------------------------------------
"celtic77" a écrit dans le message de groupe de discussion :
Bonjour Auriez vous une astuce : je voudrais remplacer dans des formules tel que ¥*1 par ¥*0 contraintes c'est que mes formules ne sont jamais au même endroit : en A10 j'ai ¥*1 et en A15 j'ai ¡1*1 etc..... Je voulais faire une edition remplace *1 par *0 mais cela ne marche pas bien entendu En espèrant avoir été clair Merci à vous
Attention, la proc�dure recherche ces caract�res *1 pour les remplacer par *0. La question que tu dois te poser : Est-ce que cela risque d'affecter d'autres cellules qui ont aussi la s�quence de caract�res *1 dont tu ne veux pas toucher ?
'-------------------------------------- Sub test() With Worksheets("Feuil1") 'Nom feuille � adapter With .Range("A1:A10") 'Plage � adapter .Replace what:="~*1", Replacement:="*0", lookat:=xlPart End With End With End Sub '--------------------------------------
"celtic77" a �crit dans le message de gro upe de discussion :
Bonjour Auriez vous une astuce : je voudrais remplacer dans des formules tel que ¥*1 par ¥*0 contraintes c'est que mes formules ne sont jamais au m�me endroit : en A10 j'ai ¥*1 et en A15 j'ai ¡1*1 etc..... Je voulais faire une edition remplace *1 par *0 mais cela ne marche pas bien entendu En esp�rant avoir �t� clair Merci � vous
Attention, la proc�dure recherche ces caract�res *1
pour les remplacer par *0. La question que tu dois te
poser : Est-ce que cela risque d'affecter d'autres
cellules qui ont aussi la s�quence de caract�res *1
dont tu ne veux pas toucher ?
'--------------------------------------
Sub test()
With Worksheets("Feuil1") 'Nom feuille � adapter
With .Range("A1:A10") 'Plage � adapter
.Replace what:="~*1", Replacement:="*0", lookat:=xlPart
End With
End With
End Sub
'--------------------------------------
"celtic77" <celtic77@aliceadsl.fr> a �crit dans le message de gro upe de discussion :
b7313896-9bca-4e69-a257-5d9dbd20c429@f33g2000vbm.googlegroups.com...
Bonjour
Auriez vous une astuce : je voudrais remplacer dans des formules tel
que =A5*1 par =A5*0
contraintes c'est que mes formules ne sont jamais au m�me endroit :
en A10 j'ai =A5*1
et en A15 j'ai =A11*1 etc.....
Je voulais faire une edition remplace *1 par *0 mais cela ne marche
pas bien entendu
En esp�rant avoir �t� clair
Merci � vous
Attention, la proc�dure recherche ces caract�res *1 pour les remplacer par *0. La question que tu dois te poser : Est-ce que cela risque d'affecter d'autres cellules qui ont aussi la s�quence de caract�res *1 dont tu ne veux pas toucher ?
'-------------------------------------- Sub test() With Worksheets("Feuil1") 'Nom feuille � adapter With .Range("A1:A10") 'Plage � adapter .Replace what:="~*1", Replacement:="*0", lookat:=xlPart End With End With End Sub '--------------------------------------
"celtic77" a �crit dans le message de gro upe de discussion :
Bonjour Auriez vous une astuce : je voudrais remplacer dans des formules tel que ¥*1 par ¥*0 contraintes c'est que mes formules ne sont jamais au m�me endroit : en A10 j'ai ¥*1 et en A15 j'ai ¡1*1 etc..... Je voulais faire une edition remplace *1 par *0 mais cela ne marche pas bien entendu En esp�rant avoir �t� clair Merci � vous
| Pour la question, à part les formules du genre : | =CR218*Taux_actu1 | est ce que celle ci peut etre affectée ?
Cela touche expressément les cellules qui ont la séquence des caractères "*1" ce qui n'est pas le cas dans l'exemple que tu as donné.
LSteph
Bonjour,
Autrement si tu voulais, remplacer *437 par *225 par exemple tu fais un premier collage spécial formule division de C7 puis un collage spécial formule multiplication de "5
----car sinon à part cela--- Si c'est toujours * par 1 forcément cela ne changera rien Si c'est par *0 qu'il faut remplacer autant multipklier le tout par 0 directement -----Fin de à part-- Dans une cellule tu mets =0 tu la copie, sélectionne ta plage à modifier et tu execute un collage spécial formule multiplication
Cordialement.
-- lSteph
On 14 sep, 14:39, celtic77 wrote:
Bonjour Auriez vous une astuce : je voudrais remplacer dans des formules tel que ¥*1 par ¥*0 contraintes c'est que mes formules ne sont jamais au même endroit : en A10 j'ai ¥*1 et en A15 j'ai ¡1*1 etc..... Je voulais faire une edition remplace *1 par *0 mais cela ne marche pas bien entendu En espèrant avoir été clair Merci à vous
Bonjour,
Autrement si tu voulais, remplacer *437 par *225 par exemple
tu fais un premier collage spécial formule division de =437
puis un collage spécial formule multiplication de =225
----car sinon à part cela---
Si c'est toujours * par 1 forcément cela ne changera rien
Si c'est par *0 qu'il faut remplacer autant multipklier le tout par 0
directement
-----Fin de à part--
Dans une cellule tu mets =0
tu la copie, sélectionne ta plage à modifier et tu execute un collage
spécial formule multiplication
Cordialement.
--
lSteph
On 14 sep, 14:39, celtic77 <celti...@aliceadsl.fr> wrote:
Bonjour
Auriez vous une astuce : je voudrais remplacer dans des formules tel
que =A5*1 par =A5*0
contraintes c'est que mes formules ne sont jamais au même endroit :
en A10 j'ai =A5*1
et en A15 j'ai =A11*1 etc.....
Je voulais faire une edition remplace *1 par *0 mais cela ne marche
pas bien entendu
En espèrant avoir été clair
Merci à vous
Autrement si tu voulais, remplacer *437 par *225 par exemple tu fais un premier collage spécial formule division de C7 puis un collage spécial formule multiplication de "5
----car sinon à part cela--- Si c'est toujours * par 1 forcément cela ne changera rien Si c'est par *0 qu'il faut remplacer autant multipklier le tout par 0 directement -----Fin de à part-- Dans une cellule tu mets =0 tu la copie, sélectionne ta plage à modifier et tu execute un collage spécial formule multiplication
Cordialement.
-- lSteph
On 14 sep, 14:39, celtic77 wrote:
Bonjour Auriez vous une astuce : je voudrais remplacer dans des formules tel que ¥*1 par ¥*0 contraintes c'est que mes formules ne sont jamais au même endroit : en A10 j'ai ¥*1 et en A15 j'ai ¡1*1 etc..... Je voulais faire une edition remplace *1 par *0 mais cela ne marche pas bien entendu En espèrant avoir été clair Merci à vous
celtic77
Merci lsteph ça y est grace à la macro de Michel tout est bon Ciao Et bonne journée
michdenis a écrit :
| Pour la question, à part les formules du genre : | =CR218*Taux_actu1 | est ce que celle ci peut etre affectée ?
Cela touche expressément les cellules qui ont la séquence des caractères "*1" ce qui n'est pas le cas dans l'exemple que tu as donné.
Merci lsteph ça y est grace à la macro de Michel tout est bon
Ciao
Et bonne journée
michdenis a écrit :
| Pour la question, à part les formules du genre :
| =CR218*Taux_actu1
| est ce que celle ci peut etre affectée ?
Cela touche expressément les cellules qui ont
la séquence des caractères "*1" ce qui n'est pas le cas
dans l'exemple que tu as donné.