Conversion chaîne "" en type Double non
Résolu
Bonjour à tous,
Je rencontre un bugg dans mon programme. Lors d'une boucle destinée à repérer des répétitions dans un fichier Excel, le programme plante avec l'erreur suivante : "La conversion de la chaîne "" en type Double n'est pas valide" .
Le code provoquant cette erreur est le suivant (ligne2) :
1.For i =5 to 316
2. If feuilexcel.Worksheets("feuil1").range("F" & i).Value <> "" then
'teste uniquement les cellules remplies
3.mmx(i) = feuilexcel.Worksheets("feuil1").range("F" & i).Value
4.End if
5.Next
...
(Le reste du code ne pose aucun problème et fonctionne pour un autre projet)
Si quelqu'un a une idée de la raison du pb, je le remercie d'avance
Je rencontre un bugg dans mon programme. Lors d'une boucle destinée à repérer des répétitions dans un fichier Excel, le programme plante avec l'erreur suivante : "La conversion de la chaîne "" en type Double n'est pas valide" .
Le code provoquant cette erreur est le suivant (ligne2) :
1.For i =5 to 316
2. If feuilexcel.Worksheets("feuil1").range("F" & i).Value <> "" then
'teste uniquement les cellules remplies
3.mmx(i) = feuilexcel.Worksheets("feuil1").range("F" & i).Value
4.End if
5.Next
...
(Le reste du code ne pose aucun problème et fonctionne pour un autre projet)
Si quelqu'un a une idée de la raison du pb, je le remercie d'avance
Configuration: Windows 2000 Internet Explorer 6.0
3 réponses
-
De rien, content que ça fonctionne
;o)
Polux -
Merci,
J'ai essayé et je n'ai plus aucun pb !
Bonne journée -
bonjour,
Ta cellule doit avoir un format double ... il faut faire une transformation en string avec Cstr :
2. If CStr(feuilexcel.Worksheets("feuil1").range("F" & i).Value) <> "" then ...
;o)
polux
