Discussion :

[vérokit]

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) :

Code :

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

1
2
3
4
5
6
7
 For i =5 to 316
If feuilexcel.Worksheets("feuil1").range("F" & i).Value <> "" then 
'teste uniquement les cellules remplies
mmx(i) = feuilexcel.Worksheets("feuil1").range("F" & i).Value
End if
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

[Philippe Vialatte]

salut,

permiere question, sur laquelle des lignes le debuggeur s'arrete ?

Si c'est sur :

Code :

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

If feuilexcel.Worksheets("feuil1").range("F" & i).Value <> "" then

essaye de changer ta ligne comme cela :

Code :

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

If feuilexcel.Worksheets("feuil1").range("F" & i).Value.ToString() <> "" then

Si c'est sur :

Code :

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

mmx(i) = feuilexcel.Worksheets("feuil1").range("F" & i).Value

, dans un premier temps, regarde a quelle ligne cela se bloque, et essaye de voir le contenu de la cellule

Dans les deux cas, verifies le type excel de tes cellules

(perso, ca fait, quoi, 2 ans que je n'ai plus fait d'automation Excel, alors je suis un peu rouille...mais c'est par la que je chercherais )

[vérokit]

Merci !
J'ai essayé la conversion en string et cela fonctionne
Bonne journée
Encore merci

PS la ligne qui buggait était la ligne 2, je l'avais indiqué entre parenthèse)