Menu

VBA savoir si un WorkBook quelconque est ouvert et effectuer un opération en fon [Résolu]

Messages postés
43
Date d'inscription
mardi 13 novembre 2018
Dernière intervention
23 janvier 2019
-
Bonjour voilà aujourd'hui j'ai un fichier excel qui va exécuté automatiquement un userform en masquant le workbook.
A la fermeture de l'userform il va fermé mon workbook mais ne ferme pas excel en lui même donc il garde une page excel grise ouverte, mais si j'ai un autre fichier excel ouvert il me ferme bien tous et me garde mon autre fichier ouvert, se que je veux évidement.
Moi j'aimerai que quand il se ferme si il n'y a pas d'autre fichier excel ouvert alors il ferme excel en lui même avec le code:
ActiveWorkbook.Close true


Sinon il ferme seulement le workbook avec le code:

ThisWorkbook.Close True


Merci d'avance pour votre aide.
Afficher la suite 

Votre réponse

1 réponse

Messages postés
24156
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
24 janvier 2019
2156
0
Merci
Bonjour,

Il suffit de compter le nombre de classeurs ouverts
if Application.Workbooks.Count > 0 Then 
  'il y a des classeurs ouverts...


NeOXi-_Alpha
Messages postés
43
Date d'inscription
mardi 13 novembre 2018
Dernière intervention
23 janvier 2019
-
parfait, tout a fait se qu'il me faut merci beaucoup.
Commenter la réponse de jordane45