Verouillage Dévérouillage Onglet
Bonjour
Pourrais je avoir votre support s'il vous plait sur la réalisation suivante.
Le but est de Verrouiller et déverrouiller des onglets en un Click et de les rendre Very Hiden
Pour verrouiller le mot de pass par defaut et "Panda2018"
Pour dévérouiller également mais qui doit lire le texte contenu dans Master!J4
car ça sera la zone de saisie
Merci d'avance pour votre aide
Bien cordialement
Bonjour,
voulez-vous dire Masquer et afficher des onglets ?
note: Verrouiller et déverrouiller s'appliquent aux cellules.
Merci de l'info
c'est bien des onglets que je souhaite cacher
cordialement
Bonjour,
à tester,
Sub Affiche_Onglets()
For Each sht In Worksheets
If sht.Name <> "Master" Then sht.Visible = True
Next
End Sub
Sub Masque_Onglets()
For Each sht In Worksheets
If sht.Name <> "Master" Then sht.Visible = xlVeryHidden
Next
End Sub