Discussion :

[Al soltani]

Bjr à tous,

J'aurais aimé lancer une requête de selection avec plusieurs paramètres depuis vb. J'ai donc écrit le code suivant :

Code :

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

1
2
3
4
5
6
 
Set qry1 = CurrentDb.QueryDefs("Qry_Chiffres_cle")
      With qry1
         .Parameters("param_a") = test1
         .Parameters("param_m") = test2
      End With

Je voudrais ensuite exporter les résultats de cette requête dans un fichier Excel. J'ai donc rajouter :

Code :

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

1
2
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9,
 qry1, "G:\Coordination\Base de donnees Service client\Classeur1.xls"

Le pb c'est que lorsque j'execute ce code, le message d'erreur 2498 apparait : "Le type d'une expression entrée pour 1 des arguments est incorrect"

Donc si qq'un à une solution ou un début d'explication...

Merci de votre aide

[marot_r]

Ton problème viens du param qry1, la commande attend un nom de table ou de query donc une string mais pas un objet query comme tu lui passe.

Je te suggère de créer une table temporaire que tu exportera (attention en environement multi-utilisateurs) ou de faire l'export à la main en ouvrant un objet Excel et en bouclant sur tes enregsitrements.

A+

[Al soltani]

ok merci donc c'était impossible que ça marche ce que j'avais fait.