Convertion de chaîne ...

Résolu/Fermé
Utilisateur anonyme - 6 juin 2014 à 23:04
 Utilisateur anonyme - 26 oct. 2014 à 18:50
Bonsoir je suis actuellement sur un projet mais il y a un problème, lorsque je lance le débogage, cette erreur s'affiche :

La conversion de la chaîne "" en type 'Double' n'est pas valide.

Que faire ? Merci

1 réponse

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
7 juin 2014 à 18:31
Bonjour,

Il faut tester la variable, par exemple :
Option Explicit
Sub test()
Dim MaChaine As String
Dim MonNombre As Double

MaChaine = "0,23"
If IsNumeric(MaChaine) Then
  MonNombre = CDbl(MaChaine)
  MsgBox MonNombre
Else
  MsgBox "La variable 'MaChaine' (" & MaChaine & ") ne peut pas être" & _
         " convertie," & vbCr & "car elle ne représente pas un nombre !"
End If

MaChaine = "0.23"
If IsNumeric(MaChaine) Then
  MonNombre = CDbl(MaChaine)
  MsgBox MonNombre
Else
  MsgBox "La variable 'MaChaine' (" & MaChaine & ") ne peut pas être" & _
         " convertie," & vbCr & "car elle ne représente pas un nombre."
End If

End Sub
0
Utilisateur anonyme
26 oct. 2014 à 18:50
Je te remercie :)
0