Ajouter un fichier Excel dans Access

Bolska -  
Le Pingou Messages postés 12713 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Pourriez-vous m'aider à trouver comment ajouter un bouton dans Access pour qu'il ouvre un fichier Excel?
Merci de votre aide.
A voir également:

1 réponse

Le Pingou Messages postés 12713 Date d'inscription   Statut Contributeur Dernière intervention   1 467
 
Bonsoir,
Vous rattachez votre bouton de commande à ce code :

Sub VersExcel()
'---- Déclarations des variables
Dim Xl As Excel.Application
Dim Classeur As Excel.Workbook
Dim Feuille As Excel.Worksheet

'---- Ouvre Excel et le classeur sur la feuille 3
Set Xl = New Excel.Application
Xl.Visible = True
Set Classeur = Xl.Workbooks.Open("P:\**\**\**\Divers\Mon_Classeur.xls")
Set Feuille = Mon_Classeur.Worksheets("Feuil3")

End Sub
0