Discussion :

[tryonyco]

Bonjour,

Pour les besoins de mon application, je dois recupérer le contenue d'une feuille excel (import des données dans une base ACCES).

Je cherche à ouvrir la feuiille pour copier les données.

Voici le debut du code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
// Declaration
Variant VarExcel;
Variant NomFichier, VarListe, VarListes;
 
//////////*  Creation de l'instance */
VarExcel = Variant::CreateObject("Excel.Application");
VarExcel.OlePropertySet("Visible", true);
 
/*// Cree une feuille : ca marche
VarListes = VarExcel.OlePropertyGet("Workbooks");
VarListe = VarListes.OleFunction("Add");        */
 
//////////*  Ouvrir une feuille de calcul */
// Fenetre de dialoge : choix du fichier
TOpenDialog * WOpen;
WOpen= new TOpenDialog (Owner);
WOpen->Filter="Tous les fichiers (*.XLS)|*.xls";
WOpen->Execute();
NomFichier = open->FileName;
// Ouverture du fichier
VarListes = VarExcel.OlePropertyGet("Workbooks");
VarListe = VarListes.OleFunction("Open", NomFichier);

A la compil, il m'annonce un probleme "Type de variable incorrect"

Avez vous une idée ?

Merci d'avance, TRYONYCO

[pottiez]

Bonjour,
peut-tu donnais plus d'information ? Notamment la ligne qui pose problème, normalement le compilateur le précise.

[tryonyco]

Bonjour,

Tout d'abors, desolé pour les balises.
Le probleme apparait sur la dernier ligne, a l'ouverture du fichier.
La partie ouverture d'excel et creation d'une nouvelle feuille fonctionne.

[pottiez]

Je viens de compiler ton code, et la seul erreur que le compilateur ma renvoyé est "Symbole 'open' non défini", et en effet dans le code que tu as posté, juste avant l'ouverture du fichier, la ligne :

Code :

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

NomFichier = open->FileName;

doit être changé en :

Code :

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

NomFichier = WOpen->FileName;

Ensuite cela compile bien chez moi

[tryonyco]

Le WOpen est une erreur de saisie. J'ai le probleme à l'excecution.
Voici le message complet : "Le ... .exe a provoqué une classe d'exception EOleSysError avec le message "type de variable incorrect" ..."

[pottiez]

J'ai effectivement le problème a l'exécution également, je n'ai pas de solution à te proposer pour le moment