fermeture application excel sur windows 2007

Bonjour,
Je rencontre un problème lors de la fermeture d'un fichier Excel.

Avec la commande Workbooks("Feuille de piquets.xlsm").Close Save = False
une fenêtre excel vide reste à l'écran.
Comment faire pour quitter mon Workbooks("Feuille de piquets.xlsm") sans sauver et  afficher ma page htm en plein écran?


Voici mon code:

Sub EnrFichierNoSemaine_click()
Dim NoSemaine As Variant
NoSemaine = Range("D1")
ScreenUpdating = False
    ActiveSheet.Shapes("ZoneTexte 7").Visible = False
    ActiveSheet.Shapes("EnrFichierNoSemaine").Visible = False
        With ActiveWorkbook.PublishObjects.Add(xlSourceSheet, _
        "G:\soapWeb\Exploitation\FeuillePiquet\Piquet Semaine " & "" & NoSemaine & ".htm", _
        "Feuil1", "", xlHtmlStatic, "")
        .Publish True
        .AutoRepublish = False
End With
        ActiveSheet.Shapes("EnrFichierNoSemaine").Visible = True
        ActiveSheet.Shapes("ZoneTexte 7").Visible = True
        Shell "explorer " & "G:\soapWeb\Exploitation\FeuillePiquet\Piquet Semaine " & "" & NoSemaine & ".htm " & "", vbMaximizedFocus
        ScreenUpdating = True
    Windows("Feuille de piquets.xlsm").Activate
    Workbooks("Feuille de piquets.xlsm").Close Save = False
End Sub

Merci d'avance.

J-Louis

Bonjour,
Pour quitter Excel
Application.Exit()

++

bonjour Willi,

Merci mais je crois que la commande Exit, ferme tous les classeurs ouverts.
j'aimerai seulement fermer complètement mon fichier "Feuille de piquets.xlsm"

J-Louis

Je vais tester ça demain au boulot,

J-Louis

Bonsoir,

Alors il semblerait que sur excel 2007

Application.Quit  ne referme pas tous les classeurs ouverts mais seulement le classeur actif...

Ce que j'ai appliqué à la dernière phase de ma procédure.
Et ensuite j'ai créé un procédure Auto_Close
Sub Auto_Close () ' qui s'execute à la fermeture du classeur
Active.Workbooks.close save = True 'Fermeture du classeur avec enregistrement
                                 sans passer par la boite de dialogue(voulez-vous enregister.....)
End Sub

Je ne sais pas si c'est vraiment conventionel mais ça marche

A+

J-Louis