XL 2016 Interdire ou pas la fermeture d'un classeur

  • Initiateur de la discussion Initiateur de la discussion vgendron
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

vgendron

XLDnaute Barbatruc
Bonjour le forum
me voici avec une question qui vient de se poser à moi...

j'ai deux classeurs xlsm ouverts en meme temps
le premier: GTA.xlsm qui ouvre le second: FVPR.xlsm
le GTA étant l'application principale qui travaille sur le FVPR

il arrive parfois que les gens ferment le FVPR par erreur===> le GTA se trouve ainsi perdu et plante
j'ai donc ajouté dans le "thisworkbook" du FVPR
VB:
Private Sub Workbook_BeforeClose(cancel as boolean)
for each wb in application.workbooks
   if wb.name like "GTA*" then
        msgbox ("Vous ne pouvez pas fermer le FVPR, car il est utilisé par le GTA")
        cancel =true
   end if
next wb
end sub

ca marche très bien: MAIS ca fonctionne tellement bien que.. lorsque le GTA veut fermer le fichier.. et bah.. il ne peut pas non plus...

comment puis je faire pour interdire la fermeture du FVPR SAUF au GTA
y aurait il une option quelque part qui dirait au FVPR d'ou vient l'ordre de fermeture??

merci pour vos idées d'avant week end 🙃
 
Bonsoir.
Il y a un moyen simple pour faire en sorte qu'un classeur de macro ne puisse être fermé si d'autres classeurs en ont besoin. C'est de cocher le nom du projet VBA du classeur de macro dans les références des projets devant l'empêcher d'être fermé. Mais du même coup l'ouverture d'un des classeurs qui l'ont, provoquera d'office son ouverture. Pour pouvoir faire ça, il faut bien sûr que le projet VBA du classeur de macro ait été renommé différemment de celui de celui des autres, qui est en général "VBAProject" par défaut. Il est à noter que dans ce cas tous les modules, procédures et variables Public du projet du classeur de macros sont connus dans les projets qui l'ont en référence.
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
1
Affichages
796
Réponses
7
Affichages
2 K
Compte Supprimé 979
C
Retour