Bonjour,
Je souhaiterai exporter une requête nommé : R_CompAcheteParFourParUt
vers un nouveau fichier Excel
Comment puis-je faire ?
En vous remerciant pour votre aide
Bonjour,
Je souhaiterai exporter une requête nommé : R_CompAcheteParFourParUt
vers un nouveau fichier Excel
Comment puis-je faire ?
En vous remerciant pour votre aide
Bonsoir,
en farfouillant dans les onglets du ruban...
![]()
Bonsoir en faite je souhaiterai le faire en vba
Merci par avance
Ah, en VBA...
avec DoCmd.TransferSpreadsheet alors...
merci, quelle est la synthaxe exacte pour exporter ma requête ?
Merci à toi
Je n'avais pas vu le lien sur la fonction mais lorsque j'exécute le code que j'ai personnalisé à ma requête rien ne se passe .... :-(
Le code exemple du lien :
Mon code personnalisé
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Function TransfertExportExcel() DoCmd.TransferSpreadsheet acExport, _ acSpreadsheetTypeExcel9, _ "Clients", _ "Clients.xls", _ True End Function
Est-ce que j'ai fait une erreur ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Function ExporteArticleVersExcel() DoCmd.TransferSpreadsheet acExport, _ acSpreadsheetTypeExcel9, _ "R_ExportCompAcheteUt", _ "Artiles_Acheté_ParUtilisateur.xls", _ True End Function
https://msdn.microsoft.com/en-us/lib.../ff844793.aspx
En spécifiant le chemin complet vers lequel effectuer l'extract peut aider.
Code : Sélectionner tout - Visualiser dans une fenêtre à part DoCmd.TransferSpreadsheet acImport, 3, "Employees","C:\Lotus\Newemps.wk3", True, "A1:G12"
Bonsoir,
Merci pour cette proposition je vais essayer
Est-ce que cette fonction permet d'exporter ma requête dans nouveau fichier xls ?
Test pour voir ca ne va pas exploser.
Et la tu as vraiment tout bien expliquer: https://msdn.microsoft.com/fr-fr/lib.../ff844793.aspx
Bonjour,
Merci ça ne fonctionnait pas mais j'ai trouvé !!! youpi !!!
voici le 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 Function ExportCompAcheteExcel() On Error GoTo Macro31_Err DoCmd.OutputTo acOutputQuery, "R_ExportCompAcheteUt", "ExcelWorkbook(*.xlsx)", , True, , , acExportQualityPrint Macro31_Exit: Exit Function Macro31_Err: MsgBox Error$ Resume Macro31_Exit End Function
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager