Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Problème de correction de formule

6 réponses
Avatar
celtic77
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

6 réponses

Avatar
michdenis
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" 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
Avatar
celtic77
Merci bien
Pour la question, à part les formules du genre :
=CR218*Taux_actu1
est ce que celle ci peut etre affectée ?

michdenis a écrit :
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" 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


Avatar
celtic77
C'est bon j'ai testé Cela marche super
Merci Michdenis toujours aussi serviable et bon !

celtic77 a écrit :
Merci bien
Pour la question, à part les formules du genre :
=CR218*Taux_actu1
est ce que celle ci peut etre affectée ?

michdenis a écrit :
> 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:=xlPar t
> End With
> End With
> End Sub
> '--------------------------------------
>
>
>
> "celtic77" a �crit dans le message de g roupe 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 endro it :
> 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


Avatar
michdenis
| 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é.
Avatar
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


Avatar
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é.