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

XL 2010 Macro pour mot de passe à l'ouverture d'Excel

Orson83

XLDnaute Impliqué
Bonsoir le forum,
Je rencontre un problème pour protéger l'ouverture de mon fichier Excel. En effet j'aimerai qu'à l'ouverture de mon fichier, Excel me demande un mot de passe avant de montrer les onglets. J'ai essayé avec les options présentes dans Excel mais le problème c'est qu'elles permettent soit la modification du mot de passe, soit carrément la suppression.
Je me demandais s'il était possible de faire cela avec une macro qui ouvrirait une message box pour saisir un mot de passe qui serait déjà renseigné dans le code et qui serait unique. J'ai fouillé Internet dans tous les sens mais je n'ai pas trouvé de macro exploitable.
Merci pour votre aide.
PS : ce mot de passe serait différent de celui qui protège déjà mon classeur et mes feuilles.
 
Solution
sylvanu à dit:
Ci joint une PJ, seules les feuilles paires sont visibles, et aucune n'est accessible par le menu afficher.Regarde la pièce jointe 1094681
Cliquez pour agrandir...
Je ne comprends pas pourquoi elles ne seraient pas toutes affichées (sauf la A mais ce problème est résolu).
Je les ai toutes passées en xlVisible dans les propriétés VBE, puis masqué la feuille 2 par le clic droit dans l'onglet, enregistré XL et à la réouverture d'Excel impossible de la ré-afficher au clic droit dans l'onglet.
Je pense vous avoir suffisamment sollicité et pour cela je vous dis un grand MERCI.
Très belle soirée.
Bien amicalement.
François
Trier par date Trier par votes

Orson83

XLDnaute Impliqué
Staple1600 à dit:
Re

Je confirme que le fichier du post#56 fonctionne.
(testé sur Excel 2003)
Par contre le mot de passe du projet VBA n'est plus TESTVBA.
(mais c'est secondaire...)
Cliquez pour agrandir...
Tu as bien contrôlé l'affichage des feuilles au clic droit dans un onglet ?
La feuille nommé A doit être non visible (veryhidden) et toutes les autres feuilles visibles, ce qui n'est pas le cas à la réouverture d'Excel si certaines étaient masquées.
 
Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc
Re

- Plantage à la première ouverture (Erreur 91) mais cette fois après la saisie du mot de passe. Les feuilles essaient de s'ouvrir, puis boite de débogage
Cliquez pour agrandir...
Je n'ai pas eu ce message d'erreur.

Et je n'ai pas fais d'autres investigations puisque pas d'accès au projet VBA
(mot de passe n'étant plus TESTVBA)
 
Vote positif 0 Vote négatif

Patrice33740

XLDnaute Impliqué
Les sécurités d'Excel sont parfois contradictoires, depuis Excel 2013 le mode protégé, protège le PC des fichiers douteux, par exemple ceux qui proviennent d'Internet.
Ça n'interdit pas l'exécution des macros mais ça limite les actions que ces macros peuvent faire sur le fichier.

Cela ne fait que confirmer l’extrême fragilité et l'utopie de la protection par macro.

Ceci dit, si tu veux tester les fichiers (ils fonctionnent tous depuis le début), il faut les exécuter dans un contexte qui autorise l'exécution des macros sans restriction. Au niveau des options de sécurité des macro, depuis l'apparition du mode protégé, il manque une précision importante : ces choix ne concernent que les fichiers situés dans un emplacement de confiance.

Je te déconseille très vivement de désactiver le mode protégé.
Le plus simple est définir un répertoire de confiance dans lequel tu enregistres les fichiers avec macro :
Options Excel / Centre de gestion de confidentialité / Paramètres du centre de confidentialité / Emplacements approuvés

EDIT @Staple1600 : avec Excel 2003 tu n'auras pas son problème.
 
Dernière édition:
Vote positif 0 Vote négatif

Orson83

XLDnaute Impliqué
sylvanu à dit:
Sorry. Ca marche et la feuille A est veryhidden.Regarde la pièce jointe 1094678
Je commence à douter de votre XL.
Cliquez pour agrandir...
Vous avez bien contrôlé l'affichage des feuilles au clic droit dans un onglet ?
La feuille nommé A doit être non visible (veryhidden) et toutes les autres feuilles visibles, ce qui n'est pas le cas à la réouverture d'Excel si certaines étaient masquées auparavant.
Cela est confirmé dans votre vidéo car la feuille 2 n'est plus visible et à priori plus affichable au clic droit dans l'onglet.
Inversement pour la feuille A qui ne sera pas xlVeryHidden avec le clic droit dans un onglet.
Merci de confirmer si cela est vrai. Le cas contraire, je mettrai en cause ma version d'Excel et certainement pas l'excellent travail qui vous avez réalisé.
 
Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc
Supporter XLD
"A" n'est pas VeryHidden car je ne l'ai pas mis en VeryHidden.
( non visible n'est pas VeryHidden mais Hidden seulement )
Par pitié, lisez le code : Sheets("A").Visible = False , en ligne 19.
Les feuilles masquées sont celles qui l'ont été à la fermeture.
Si vous voulez, changez ce False par xlSheetVeryHidden.
 
Vote positif 0 Vote négatif

Orson83

XLDnaute Impliqué
Désolé. J'ai modifié la ligne 19 avec xlVeryHidden et effectivement la feuille A n'est plus visible depuis le clic droit dans l'onglet (ce problème est résolu).
Je ne comprends pas pourquoi la feuille 2 n'est plus accessible ? (au clic droit dans l'onglet)
 
Vote positif 0 Vote négatif

Orson83

XLDnaute Impliqué
sylvanu à dit:
Ci joint une PJ, seules les feuilles paires sont visibles, et aucune n'est accessible par le menu afficher.Regarde la pièce jointe 1094681
Cliquez pour agrandir...
Je ne comprends pas pourquoi elles ne seraient pas toutes affichées (sauf la A mais ce problème est résolu).
Je les ai toutes passées en xlVisible dans les propriétés VBE, puis masqué la feuille 2 par le clic droit dans l'onglet, enregistré XL et à la réouverture d'Excel impossible de la ré-afficher au clic droit dans l'onglet.
Je pense vous avoir suffisamment sollicité et pour cela je vous dis un grand MERCI.
Très belle soirée.
Bien amicalement.
François
 
Vote positif 0 Vote négatif
Solution

sylvanu

XLDnaute Barbatruc
Supporter XLD
Lisez le code plutôt que vous posez des questions métaphyqiues.
C'est ainsi fait dans le code. Je n'avais aucune demande contraire.
Ligne 32, la table est faite pour que 0 visible, 1 VeryHidden.
si vous voulez remettre exactement les feuilles dans l'état alors il faut gérer trois états dans la table : Visible, Hidden, VeryHidden. Et réutiliser ces trois états dans la macro d'ouverture.
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

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
7
Affichages
744
sylvanu
  • Résolu(e)
XL 2013 (RESOLU)Mot de passe Masqué
Réponses
5
Affichages
682
Compte Supprimé 979
C
N
  • Résolu(e)
Microsoft 365 Mot de passe pour activation macro
Réponses
4
Affichages
355
Nathan027
N
T
  • Question
Microsoft 365 Cacher / détailler certaines colonnes dans certains onglets avec mot de passe
Réponses
6
Affichages
613
ThierryP
T
J
  • Résolu(e)
XL 2010 Avoir 2 mots de passe pour une même macro?
Réponses
2
Affichages
367
jigour
J
A
  • Résolu(e)
Microsoft 365 Enregistrer copie d'un fichier avec pour nom le contenu d'une cellule excel (macro)
2
Réponses
15
Affichages
619
firecarl
F
C
  • Résolu(e)
Autres Code VBA pour recherche et copie/coller de ligne avec mot clé.
Réponses
12
Affichages
469
Corentin26270
C
E
  • Résolu(e)
Microsoft 365 "Enregistrer sous" avec mot de passe à l'ouverture
Réponses
6
Affichages
606
etpisculrien
E
A
  • Résolu(e)
XL 2021 Céer un fichier (.text) avec VBA pour enregistrer les évènements dans un journal
Réponses
4
Affichages
411
arnoldbrice19
A
A
  • Question
XL 2013 Liaisons de données externes avec un fichier contenant un mot de passe
Réponses
14
Affichages
813
Staple1600
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…