Discussion :

[mouaa]

Bonjour,

après avoir lu le tuto de Cafeine (que je remercie pour toutes ces informations qu'il partage), je m'essaye à exporter des requêtes vers excel.

étant donné le temps que prend un export de type "Automation", je m'essaye au "DoCmd.OutputTo".

mais ça ne fonctionne pas comme je voudrais:
voilà mon code:

Code :

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

1
2
3
DoCmd.OutputTo acOutputQuery, "R_Extract_UO", acSpreadsheetTypeExcel, "D:\test.xls", True
'ou encore
DoCmd.OutputTo acOutputQuery, "R_Extract_UO", acSpreadsheet, "D:\test.xls", True

avec ça, lors du clic sur mon bouton, access me propose de choisir un format de sortie dans une liste. l'export fonctionne ! mais je préfèrerais qu'il ne me le propose pas et qu'il le fasse tout seul comme un grand.
qu'à cela ne tienne:

Code :

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

DoCmd.OutputTo acOutputQuery, "R_Extract_UO", acSpreadsheetTypeExcel9, "D:\test.xls", True

.... oui à priori ....

mais pourtant, access n'est pas du même avis....

"erreur d'exécution 2282"
"Les formats qui vous permettent de copier des données à un Microsoft Excel, un format RTF, un Texte MS-DOS ou un format HTML sont manquants du Registre de Windows."

je trouve ça pas très parlant, je ne comprends pas trop ce qu'il me veut....

si quelqu'un peut m'aider....

[Gabout]

Bonjour,

Je suis étonné de ton code. Je suis sur Access 2000 et je ne rencontre pas les formats de sortie auxquels tu fais référence. Moi, je ne dispose que de

Code :

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

1
2
3
4
5
6
7
8
acFormatASP
acFormatDAP
acFormatHTML
acFormatIIS
acFormatRTF
acFormatSNP
acFormatTXT
acFormatXLS

Essaie de transformer ton code en

Code :

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

DoCmd.OutputTo acOutputQuery, "R_Extract_UO", acFormatXLS, "D:\test.xls", True

[mouaa]

En effet !

pour ma part il ne me proposait rien du tout, donc j'y suis allée un peu au hazard !

mais en effet, ça fonctionne mieux tout de suite avec ton code !

Merci beaucoup !

[mouaa]

Par contre j'ai une autre question à ce sujet...

comme ça fonctionnait très bien, j'ai essayé le même code avec, à la place du nom de ma requête, un DAO.Recordset...

ça ne plait pas à access.

Ya-t-il un moyen d'exporter un recordset ?
(en utilisant toujours cette technique simple, puisque l'automation qui est espliquée sur le tuto de cafeine est beaucoup trop longue pour moi... on passe d'exportations de 2secondes à des exportations de 67secondes en moyenne, pour les mêmes données)

[Jean-Philippe André]

salut,
as-tu pensé à cocher la référence DAO dans ton projet ?

[mouaa]

bon j'ai fait de la bidouille, ça ira très bien comme ça.

j'explique: je crée une requête dans access, je l'exporte, et je la supprime, comme ça, je reste sur de l'export simple de requête, et j'évite la lenteur d'export.

je crée et supprime la requête parce que je n'ai pas trouvé comment modifier le sql d'une requête (enfin si, j'ai trouvé un petit bout de code tout simple, en passant par ADO, mais ça augmente le temps t'exécution du code, et en plus, je ne connais rien du tuot à ADO).

@+ !

[mouaa]

ps: oui jpcheck, DAO est bien cochée....

[Jean-Philippe André]

d'accord,
pour accéder au code sql d'une requête, tu peux passer par ceci:

Code :

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

1
2
3
4
dim tempo as QueryDef
For each tempo in CurrentDb.QueryDefs
debug.print tempo.name & ":" & tempo.SQL
Next