Discussion :

[sambrook]

Bonjour

je cherche à convertir pour convertir ce genre de case

de 003.813027 "format string" en format numerique decimal 3,813027


j'ai essayé CDbl et CCur

Public Sub convertir()

With Sheets("Feuil1")
.Cells(13, 16).Value = CDbl(Cells(13, 16).Value)

End With
End Sub

ça retourne l'erreur de incompatibilité de type

Merci bcp

[tedo01]

Bonjour,
Essaie ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

CDbl(Replace(Cells(13, 16).Value, ".", ","))

Si ton séparateur décimal est la virgule, Excel ne peut pas comprendre un chiffre avec un point. Il faut donc remplacer le point par la virgule avant de lui demander de convertir en nombre.