Les décimales donnent une erreur dans la macro

Bonjour tout le monde,

J'ai fait une macro pour compter des cellules qui correspondent à mes critères donc un COUNTIFS :

p = 0

p_max = 0.021

l = 7

v = 7

While p < p_max

step = Range("AJ" & v)

Range("AK" & l).Select

'ActiveCell.FormulaR1C1 = "=COUNTIFS(C[-6],"">=" & p & """,C[-6],""<" & p + step & """)"

p = p + step

v = v + 2

Wend

Le problème est que j'obtiens une erreur à cause des décimales de p_max. J'ai essayé avec un nombre entier et tout marche.

Le même problème va se poser avec le step qui n'est pas non plus un entier.

Donc est-ce que quelqu'un sait comment palier à ce problème?

Merci d'avance pour votre aide !

Bonjour Alexandre 000000 le forum

Le même problème va se poser avec le step qui n'est pas non plus un entier.

je reviens on m'appelle

a+

Papou

Bonjour,

tu peux utiliser la balise Code quand tu en mets que ce soit plus lisible stp.

Merci

eric

Au final j'ai utilisé la fonction replace pour passer au travers le problème des points et des virgules :

p = Replace(p, ",", ".")
p_max = Replace(p_max, ",", ".")
step = Replace(step, ",", ".")

Tout est ok maintenant, merci quand même pour vos réponses !

Rechercher des sujets similaires à "decimales donnent erreur macro"