Bonjour,

Je suis en train de créer mon premier programme en VB.

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
Private sub Save_click()
 
dim xl as Excel.Application
dim exldoc as Excel.Workbook
dim sheet as excel.Worksheet
 
set xl = CreateObject ("Excel.application")
set exldoc = xl.workbooks.open(chemin)
set sheet = xl.ActivateWorkbook.ActiveSheet
 
with sheet
   sheet.cells(7,3).value = ....
   Remplissage de la feuille
end with
 
exldoc.save
exldoc.close
xl.quit
 
set sheet = nothing
set xl = nothing
set exldoc = nothing
 
End Sub
Vous l'aurez compris mon bouton sert à sauvegarder des valeurs dans une feuille Excel, mon problème est qu'à chaque clique un nouveau processus EXCEL.EXE se lance et ne se ferme pas. A force, au bout de 20 sauvegarde le programme plante.

Pouvez vous m'aider svp?
Merci