Kill process EXCEL.EXE ???

Résolu
jex0519
Messages postés
10
Date d'inscription
jeudi 27 septembre 2007
Statut
Membre
Dernière intervention
9 décembre 2008
- 1 déc. 2008 à 17:14
programassia
Messages postés
8
Date d'inscription
samedi 6 janvier 2007
Statut
Membre
Dernière intervention
26 septembre 2009
- 26 sept. 2009 à 12:00
Bonjour,

voilà j'ai le problème suivant, mon programme fait appel à excel pour créer une facture puis il ferme excel, le bug survient à la création de la 2eme facture car apparament EXCEL.EXE est resté en mémoire... Comment puis-je tuer le process d'excel??

Merci d'avance

5 réponses

bigfish_le vrai
Messages postés
1835
Date d'inscription
vendredi 13 mai 2005
Statut
Membre
Dernière intervention
20 novembre 2013
12
1 déc. 2008 à 21:09
Salut,

Deja un petit truc plutot que defaire comme tu le fais et pour pour eviter d'utiliser la reference Microsoft Excel X.0 Object Library tu peux faire comme ceci:

Dim facture as object
Set facture = CreateObject("Excel.Application")

en suite pour terminer je ferais comme ceci

facture.Close False
facture.Quit
set facture = Nothing.

sinon pour verifier si une session excel cachee est ouverte et pour le tuer le cas echeant tu peux aller voir une de mes sources ici :

http://www.vbfrance.com/codes/TUER-SESSION-CACHEE-EXCEL-PARTIR-AUTRE-SESSION_47514.aspx

A+
3
nhervagault
Messages postés
6063
Date d'inscription
dimanche 13 avril 2003
Statut
Modérateur
Dernière intervention
15 juillet 2011
35
1 déc. 2008 à 17:31
Salut,

Comment ouvres-tu et fermes tu Excel?

Regardes ce source.

http://www.codyx.org/snippet_comment-ouvrir-classeur-excel-vierge-depuis-vb6_202.aspx
0
jex0519
Messages postés
10
Date d'inscription
jeudi 27 septembre 2007
Statut
Membre
Dernière intervention
9 décembre 2008

1 déc. 2008 à 17:34
je fais comme ceci:

Set facture = New excel.Application 'ouvre excel
    facture.Visible = False
    facture.Workbooks.Add

'mes procédures.......
'ensuite fermeture

    facture.Visible = True
   
    'sauvegarde
    ChDir "C:"
    ActiveWorkbook.SaveAs FileName:="C:\facturier\fact-" & num & ".xls", FileFormat:=xlNormal _
    , Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
    CreateBackup:=False
   
    'apercu impression
    ActiveWindow.SelectedSheets.PrintPreview
   
'fermeture
    facture.Workbooks.Close
    facture.Application.Quit
    Set facture = Nothing
0
jex0519
Messages postés
10
Date d'inscription
jeudi 27 septembre 2007
Statut
Membre
Dernière intervention
9 décembre 2008

1 déc. 2008 à 21:46
merci c'est nickel!
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
programassia
Messages postés
8
Date d'inscription
samedi 6 janvier 2007
Statut
Membre
Dernière intervention
26 septembre 2009

26 sept. 2009 à 12:00
salut

comment je peux lancer le servur mysql comme service et créer la base de donnée et les privilège

qq un m'aider

et merci
0