Bonjour,
Via un script VB, j'ouvre un fichier excel.
J'ai actuellement trouvé les functions d'ouverture du fichier et de fermeture, mais je ne trouve pas comment sauver le fichier, de manière à ce qu'à la fermeture, je n'ai pas le message me demandant si je souhaite enregistrer avant de fermer.
Voici actuellement mon code:
Code :
- FileCopy toto.xls copie_toto.xls
- 'Déclaration des variables
- Dim appExcel As Excel.Application 'Application Excel
- Dim wbExcel As Excel.Workbook 'Classeur Excel
- Dim wsExcel As Excel.Worksheet 'Feuille Excel
- 'Ouverture de l'application
- Set appExcel = CreateObject("Excel.Application" )
- 'Ouverture d'un fichier Excel
- Set wbExcel = appExcel.Workbooks.Open (toto.xls)
|
là je remplis le fichier
Et juste avant de fermer, je voudrais sauver mon fichier
Code :
- wbExcel.Close 'Fermeture du classeur Excel
- appExcel.Quit 'Fermeture de l'application Excel
- 'Désallocation mémoire
- Set wsExcel = Nothing
- Set wbExcel = Nothing
- Set appExcel = Nothing
|
Merci de votre aide !