Bonjour,
Je travaille sur une base de données Access2007, depuis laquelle j'ouvre Excel2007 pour une extraction de données.
Problème : après demande de fermeture de l'application dans mon code, le processus reste actif...
Voici mon 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
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33 Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook Dim xlSheet As Excel.Worksheet Dim nbLignes As Integer 'Mise en page du document Set xlApp = New Excel.Application With xlApp .Visible = False Set xlBook = xlApp.Workbooks.Open("C:\~~~~\Catalogue_BO.xls") End With Set xlSheet = xlBook.Sheets("Requete_Temporaire") xlSheet.Activate ... MON TRAITEMENT (Mise en forme de cellules) ... Set xlSheet = Nothing DoEvents xlBook.Close True DoEvents 'Attend la sauvegarde/fermeture du doc avant de quitter l'appli... xlApp.Application.Quit 'Je demande de quitter l'appli Set xlBook = Nothing Set xlApp = Nothing 'Libère la mémoire
Quelqu'un aurait une idée ?
Merci d'avance
Partager