Bonjour,

j'aimerais sauvegarder puis ouvrir un fichier excel suite au click d'un bouton.

le nom du fichier se trouve sur le bouton.
Je voudrais donc ouvrir le fichier excel correspondant au nom du bouton.

J'ai des soucis pour faire cela.
Pouvez-vous m'aider?
Merci.

Pour l'ouvrir, je pense le faire de cette manière :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Dim xlsapp  As Excel.application 'objet application
Dim xlsbook As Excel.workbook 'objet feuille de calcul
Dim xlsheet As Excel.Worksheet
 
Set xlsapp = New Excel.application
'xlsapp.SaveWorkspace ("c:\essai111.xls")
Set xlsbook = xlsapp.workbooks.save("c:\essai111.xls")
Set xlsheet = xlsbook.worksheets(1)
 
xlsapp.Visible =true
Mais comment sauvegarder le fichier lors de l'ouverture?