fermeture d'excel...

[pykrees]

Bonjour à tous,

Quel est le moyen de fermer excel à partir d'une macro ?

Merci de votre aide

pyk.

 

[Johan]

Bonjour Pykrees,

la réponse à ta question est:

Application.quit


Bonne après-midi,

Johan

 

[pykrees]

Salut Johan !

Cela ne marche pas ! Cela ne ferme pas l'application Excel.

Y a t-il un truc que je n'ai pas compris???

voici mon code :
----------------------------------------------------------------------------------------------
Private Sub CommandButton3_Click()

Application.DisplayAlerts = False

'Non compatible avec excel 97
ActiveWorkbook.Sheets("Feuil1").Copy ' copie de la feuille1 dans un nouveau classeur

ActiveWorkbook.SaveCopyAs "l:\_metrologie\sav\sav_ar.xls"
ActiveWorkbook.Close

ActiveWorkbook.Close
Application.DisplayAlerts = True

Application.Quit

End Sub
--------------------------------------------------------------------------------------------
Merci

pyk

 

[Romain]

Bonjour,

Ci-joint un fichier qui enregistre les modifications puis ferme l'application Excel. Je dispose d'une version plus élaborée avec demande de confirmation, si cela t'intéresse.
Bonnes fêtes de fin d'année.

Romain

 

[Pykrees]

Merci bcp !

Bonne fêtes de fin d'années

Pyk.