Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 Rendre feuille masquée invisible

  • Initiateur de la discussion Initiateur de la discussion Etoto
  • 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 !

Etoto

XLDnaute Barbatruc
Supporter XLD
Bonjour,

J'aimerais grâce au VBA avoir un code qui rend la feuille "Administrateur" masquée mais j'aimerai aussi que si quelqu'un clique sur un onglet et sur le bouton "Afficher..." cette feuille ne soit pas visible dans cette fenêtre, mais après l'objectif est quand même de pouvoir récupérer la feuille avec un autre code. Je joint un fichier qui a deux feuilles vides pour après tester les codes.

Je me suis bien exprimé ?
 

Pièces jointes

re
je n'ai pas une très grande connaissance, je serais donc incapable d'expliquer exactement la procédure, j'ai juste fait la modification comme indiqué dans le fil 17, car il m'a semblé que le code initial ne fonctionnait pas.
cordialement
 
Re,

Ok merci, je vais bientôt sortir une MAJ de ma ressource avec vos participations, voici le lien pour l'a trouver :

 
Un essai avec fonction
VB:
Option Explicit
Sub Toto()
'1 = affichage, 2 = Masquage
On_Decide (1)
End Sub
Sub On_Decide(Num As Integer)
ThisWorkbook.Protect Structure:=False, Windows:=False
Sheets("Administrateur").Visible = Num
ThisWorkbook.Protect Structure:=True, Windows:=False
End Sub

Cordialement
 
- 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
5
Affichages
839
Compte Supprimé 979
C
Réponses
3
Affichages
354
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…