Formulaire trié Access et export dans Excel
Nath
-
Utilisateur anonyme -
Utilisateur anonyme -
Bonjour,
J'ai créé un formulaire qui permet de filtrer des données d'une base. Le résultat s'affiche dans le formulaire. Je voudrai extraire ces résultats dans Excel, mais je n'y arrive pas... Mon code VBA ne marche pas, mais je ne sais pas exactement où (pas une pro de la programmation)
Voici mon code:
Private Sub Export_Excel_Click()
Set ClasseurXLS = CreateObject("Excel.application")
ClasseurXLS.Visible = True
ClasseurXLS.Workbooks.Add
ClasseurXLS.UserControl = True
'supprime l'affichage des messages d'erreurs ou de confirmation de suppression, ...
ClasseurXLS.DisplayAlerts = False
'suppression des feuilles supplementaire du classeur la feuille du classeur
ClasseurXLS.sheets("Feuil2").Select
ClasseurXLS.ActiveWindow.SelectedSheets.Delete
ClasseurXLS.sheets("Feuil3").Select
ClasseurXLS.ActiveWindow.SelectedSheets.Delete
ClasseurXLS.sheets("Feuil1").Select
DoCmd.OutputTo acOutputForm
DoCmd.RunCommand acCmdOutputToExcel
End Sub
J'imagine qu'à un moment il faut que j'insère le nom du résultat du formulaire, mais je ne sais pas où, ni comment...
Quelqu'un aurait une idée?:
Merci d'avance,
Nath
J'ai créé un formulaire qui permet de filtrer des données d'une base. Le résultat s'affiche dans le formulaire. Je voudrai extraire ces résultats dans Excel, mais je n'y arrive pas... Mon code VBA ne marche pas, mais je ne sais pas exactement où (pas une pro de la programmation)
Voici mon code:
Private Sub Export_Excel_Click()
Set ClasseurXLS = CreateObject("Excel.application")
ClasseurXLS.Visible = True
ClasseurXLS.Workbooks.Add
ClasseurXLS.UserControl = True
'supprime l'affichage des messages d'erreurs ou de confirmation de suppression, ...
ClasseurXLS.DisplayAlerts = False
'suppression des feuilles supplementaire du classeur la feuille du classeur
ClasseurXLS.sheets("Feuil2").Select
ClasseurXLS.ActiveWindow.SelectedSheets.Delete
ClasseurXLS.sheets("Feuil3").Select
ClasseurXLS.ActiveWindow.SelectedSheets.Delete
ClasseurXLS.sheets("Feuil1").Select
DoCmd.OutputTo acOutputForm
DoCmd.RunCommand acCmdOutputToExcel
End Sub
J'imagine qu'à un moment il faut que j'insère le nom du résultat du formulaire, mais je ne sais pas où, ni comment...
Quelqu'un aurait une idée?:
Merci d'avance,
Nath
A voir également:
- Formulaire trié Access et export dans Excel
- Whatsapp formulaire opposition - Guide
- Word et excel gratuit - Guide
- Comment trier par ordre alphabétique sur excel - Guide
- Liste déroulante excel - Guide
- Formulaire de réclamation facebook compte désactivé - Guide