Je cherche un moyen de prendre les décimal d'un nombre et de les mettres en entier
Exemple
Si j'ai 100,22
Je veux que ,22 devienne 22
Je dois faire cela en utilisant la foinctione Right/Left et instr
je ne peux pas faire ,22 * 100 le résultat n'est pas bon pour ce que je veux en faire
Exemple si j'ai 100,2 je veux avoir comme résultat 2 et non 20 (si je fais ,2 * 100)
Bref quelle est la meilleur solution avec les fonctions instr et Right/Left
Sub valeur()
Dim Nombre As String, Decimale As Long
Nombre = "100,22"
Decimale = CLng(Right(Nombre, Len(Nombre) - InStr(1, Nombre, ",", 1)))
MsgBox Decimale
End Sub