AS400 vers Excel par macro

En fait ton problème est juste que tu utilises un fichier intermédiaire qui est ton fichier que tu descends depuis l'AS400

Au lieu de faire cela utilise plutot le pilote ODBC de Excel

Sous Excel tu fais "Données" "Données Externes" "Importer des données"

Tu créé ensuite ta base de données en mettant les bonnes Bibliothèques et après tu ramène le ou les fichiers

En fait Excel se base sur MS Query (composant Caché de Office). MS Query permet de faire des jointure et des tests c'est très puissant

Je l'ai utilisé énormément dans mon boulot ou je me suis beaucoup occupé de l'interfacage et de l'interprétation des données issues de notre 400


Dis moi si besoin de + d'infos

A+

bonjour,

je suis débutant et... :

je sais créer et lancer un QUERY dans notre système AS400 grâce à un code VB. d'autre part, grâce à la macro complémentaire cwbtfxla.xll iseries (fournie par IBM avec l'interface AS400) je sais récupérer les données dans un fichier excel...

ma problematique est d'automatiser le "download" (ou l'exécution de la macro complémentaire) de façon à ce que l'utilisateur n'ai pas besoin d'intervenir pour télécharger les résultats du QUERY.

le code ci-dessous fonctionne très bien mais je n'arrive pas à indiquer l'emplacement précis du fichier Excel (par exemple worksheets("results").range("B6")) où j'aimerai que les valeurs soient téléchargées :

Dim dt As New cwbx.DatabaseTransfer
dt.Download "192.168.240.1", "galfn/test_tools", chemin, cwbdtBIFF5

pour le moment, je suis obligé de passé pas un fichier EXCEL "tampon" et je trouve ça très lourd et plutôt "laid" !
merci de me donner un coup de pouce...

a+
tramber