Convertion de chaîne ...

Résolu
Utilisateur anonyme -  
 Utilisateur anonyme -
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
A voir également:

1 réponse

Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
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
 
Je te remercie :)
0