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

Mot de Passe Automatique

Créer une discussion

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 !

S'inscrire
S

samixite

XLDnaute Nouveau
Bonjour tout le monde,

J'ai un classeur comportant 3 feuilles.
J'aimerais créer une macro qui masque les feuilles 2 et 3 puis protège le classeur en utilisant un mot de passe que j'aurais défini càd que l'utilisateur n'aurait pas à spécifier le mot de passe.

Mes connaissances en VBA ne vont pas assez loin ...Merci pour votre aide
 
Trier par date Trier par votes
Re : Mot de Passe Automatique

Salut samixite, le Forum,

que veut tu dire par là?
J'aimerais créer une macro qui masque les feuilles 2 et 3 puis protège le classeur en utilisant un mot de passe que j'aurais défini càd que l'utilisateur n'aurait pas à spécifier le mot de passe.
Cliquez pour agrandir...
comment veut tu que l'utilisateur accède à ton fichier sans mot de passe tout en étant protégé?

je te conseil le fichier de Thierry qui pourrais eventuellement te dépanner

Bonne journée
 
Vote positif 0 Vote négatif
Re : Mot de Passe Automatique

Bonjour Samixite, Dull et le forum,

Un essai à modifier avec ton mot de passe :

Sub MasquerFeuillesProtectClasseur()
Application.ScreenUpdating = False
Feuilles du classeur masquées
Sheets(Array("Feuil2", "Feuil3")).Visible = False
' Protection du classeur
ActiveWorkbook.Protect Password:="***", Structure:=True, Windows:=True
Application.ScreenUpdating = True
End Sub

Cordialement

Bernard
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Mot de Passe Automatique

Bonjour

Pour mettre les pieds en commençant par des petits pas, il exite un enregistreur de macro.
Clique sur le menu Outils/Macros/Nouvelle macro..., après avoir donné un nom à cette macro, clique sur OK, puis enchaine les différentes actions :
- Sélectionne tes deux feuilles
- masque ces feuilles
- Sélectionne la feuille
- Clique sur le menu Outils/Protection/Protéger la feuille ...
- Indique ton mot de passe
- Clique sur le premier bouton de la barre d'outils "macros"

Ce qui pourrait donner ceci
Sub Macro2()
Sheets(Array("Feuil2", "Feuil3")).Select
Sheets("Feuil3").Activate
ActiveWindow.SelectedSheets.Visible = False
Range("A1").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
Cliquez pour agrandir...
@+Jean-Marie
 
Vote positif 0 Vote négatif
Re : Mot de Passe Automatique

Epoustouflant de rapidité ce forum !!!
Tout d'abord merci à tous

Pour répondre à Dull :

Je voudrais que la personne qui consulte le classeur après protection ne puisse pas voir les feuilles 2 et 3, et je veux que la personne qui active la protection n'ait pas à taper le mot de passe à chaque fois


JeanMarie,

J'ai fait ce que tu m'indiques mais ça ne résoud pas mon problème de mot de passe "prédeterminé"

Je vais tester la macro de CBernardT et vous tiens au courant

Encore merci
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

P
  • Question Question
XL 2016 Mot de passe avec administrateur
Réponses
9
Affichages
970
pangasoul
P
  • Résolu(e)
XL 2013 (RESOLU) Protection automatique des nouvelles feuilles
Réponses
6
Affichages
703
Phil69970
A
  • Question Question
Autres Protégé un fichier csv par mot de passe
2
Réponses
16
Affichages
1 K
job75
B
  • Question Question
XL 2019 Dans une macro de démarrage de fichier masquer le code par des Astérix ou point
Réponses
3
Affichages
551
sylvanu
  • Résolu(e)
XL 2013 (RESOLU)Mot de passe Masqué
Réponses
5
Affichages
913
Compte Supprimé 979
C
C
  • Résolu(e)
Autres Code VBA pour recherche et copie/coller de ligne avec mot clé.
Réponses
12
Affichages
1 K
Corentin26270
C
L
  • Question Question
Microsoft 365 masquer colonne + MDP
Réponses
2
Affichages
619
l.et.lilou
L
S
  • Résolu(e)
Microsoft 365 Mailing mise en forme HTML : revenir à la ligne automatique si trop de texte saisie
2
Réponses
17
Affichages
1 K
spike29
S
P
  • Résolu(e)
XL 2016 Masquer les caractères dans une boîte de dialogue de saisie de mot de passe Excel
Réponses
8
Affichages
1 K
AR MOR
A
T
  • Question Question
Microsoft 365 Cacher / détailler certaines colonnes dans certains onglets avec mot de passe
Réponses
6
Affichages
867
ThierryP
T
A
  • Question Question
XL 2013 Liaisons de données externes avec un fichier contenant un mot de passe
Réponses
14
Affichages
1 K
Staple1600
R
  • Question Question
Microsoft 365 aide a la creation d un classeur commercial
2
Réponses
17
Affichages
2 K
Rozey
R
S
  • Résolu(e)
Microsoft 365 vba, récupérer le résultat d'un INDEX(EQUIV en fonction du résultat
Réponses
6
Affichages
674
SOP
S
E
  • Résolu(e)
Microsoft 365 "Enregistrer sous" avec mot de passe à l'ouverture
Réponses
6
Affichages
802
etpisculrien
E
P
  • Question Question
Microsoft 365 Problème de destination à l'exécution d'une macro
Réponses
2
Affichages
746
Pimpon974
P
E
  • Question Question
XL 2013 Mot de passe VBA
Réponses
4
Affichages
1 K
eric85
E
L
  • Question Question
XL 2016 Protéger classeur
Réponses
2
Affichages
643
ChTi160
Office XLS : Fonction simplifiant l'utilisation de la fenêtre FileDialog
Réponses
6
Affichages
897
Lu76Fer
O
  • Question Question
XL 2019 Code VBA pour automatiser la programmation des rotations des ouvriers qui travaillent à temps partiel et se relaient par période de temps constante.
2 3
Réponses
35
Affichages
3 K
olivier1984
O
S
  • Résolu(e)
Microsoft 365 Recherche de date en VBA
Réponses
6
Affichages
767
sylvanu
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…