Fermeture fichier Excel utilisé uniquement

Bonjour à tous,

Ayant l'habitude d’utiliser une seul fichier Excel à la fois, j'ai un code qui dérange mes collaborateurs. Voici le code en question:

If M1_Quitter = 2 Then
        Application.Quit
        ThisWorkbook.Close False
End If

Leur soucis, c'est le fait qu'il quitte Excel et eux veulent garder leur autres fichiers ouverts.

J'ai donc simplement transformé mon code ainsi:

If M1_Quitter = 2 Then
        Application.Visible = True
        ThisWorkbook.Close False
End If

Le soucis avec ce code c'est qu'il quitte le fichier, mais il reste une fenêtre Excel vide et franchement pour ceux qui utilisent la macro 500x par jour c'est juste pas possible. Quelque chose m’échappe ou ce n'est possible de faire autrement ?

Merci ;)

Bonjour Heelflip

Tu peux faire quelque chose du style

If M1_Quitter = 2 Then
  If Application.Workbooks.Count = 1 Then
    ThisWorkbook.Close SaveChanges:=False
    Application.Quit
  Else
    ThisWorkbook.Close SaveChanges:=False
  End If
End If

A+

Rechercher des sujets similaires à "fermeture fichier utilise uniquement"