Après avoir saisi manuellement le nombre -5.25 dans la cellule A1
- avec un point, le PC étant paramétré avec le "." en séparateur décimal
- avec KK déclaré : Dim KK As Single
La lecture en VB : KK = Range("A1") donne : KK = -5,25 en texte de valeur 0

Passionné de VB depuis 15 ou 20 ans (sans très grande compétence toute fois) je n'ai jamais rencontré ce pb !
Merci pour votre aide