XL 2013 Code VBA pour afficher/maquer feuilles sur fichier protégé en lecture seule

[Francis Ford]

Bonjour,
La question a très certainement déjà été posée, mais je n'ai pas trouvé de réponse.
Pour un fichier Excel protégé en lecture seule par un mot de passe, j'aimerais connaître le code VBA pour que seules certaines feuilles s'affichent si le fichier est ouvert en lecture seule, et que toutes les feuilles s'affichent si le fichier est ouvert avec le mot de passe.
Merci d'avance pour votre aide !

 

[tbft]

Bonjour

vous avez besoin de quel type d'aide ?
les deux macros complètes ou bien juste les instructions permettant de rendre visible / invisible des feuilles ?

 

[Francis Ford]

Bonjour

vous avez besoin de quel type d'aide ?
les deux macros complètes ou bien juste les instructions permettant de rendre visible / invisible des feuilles ?

Bonjour,
Un exemple des 2 macros complètes serait l'idéal
Merci

 

[Francis Ford]

Bonjour,
Je me permets une petite relance pour savoir si quelqu'un pourrait m'aider ?
Merci à vous !

 

[Phil69970]

Bonjour @Francis Ford et @tbft

Avec un fichier représentatif les chances d'avoir une réponse augmentent considérablement. 😉

C'est quoi représentatif ?

- représentatif, même organisation des lignes et des colonnes, mêmes libellés, mêmes noms de feuilles...
- anonymisé, pas de données personnelles réelles tels nom, n° sécu, adresse ... remplacé par Nom1, Nom2 etc ....
- simplifié, une quinzaine de lignes reproduisant l'ensemble des différents cas envisageables (Avec le résultat souhaité éventuellement)

Si cela fonctionne sur le fichier fourni et pas sur le vrai fichier c'est qu'il n'est en rien représentatif ou que tu n'as pas su transposer ce qui devrait être un simple copier coller du code.

Bonne lecture

 

[vgendron]

Bonjour

un essai à adapter sur ton fichier

si tu ouvres en lecture seule, seule la feuille1 est visible (les autres sont en xlveryhiddent)

si tu ouvres avec le mot de passse (test), tout est affiché

 

[Francis Ford]

Bonjour

un essai à adapter sur ton fichier

si tu ouvres en lecture seule, seule la feuille1 est visible (les autres sont en xlveryhiddent)

si tu ouvres avec le mot de passse (test), tout est affiché

Merci @vgendron

C'est presque parfait. Il faudrait que plusieurs feuilles soient visibles si le fichier est en lecture seule. Comment je dois transformer le code ?

 

[vgendron]

es tu allé voir le code?
il suffit de modifier le test
if ws.name<>"Feuille1" '==> seule la feuille 1 sera affichée

par
if ws.name<>"Feuille1" AND ws.name<>"Feuille2" ==> les feuilles 1 et 2 seront affichées

 

[Francis Ford]

es tu allé voir le code?
il suffit de modifier le test
if ws.name<>"Feuille1" '==> seule la feuille 1 sera affichée

par
if ws.name<>"Feuille1" AND ws.name<>"Feuille2" ==> les feuilles 1 et 2 seront affichées

Oui j'étais bien allé voir le code, mais ne suis pas aguéri au VBA.C

Cela fonctionne parfaitement en tout cas, merci à toi !

 

[tbft]

Bonjour @Francis Ford et @tbft

Avec un fichier représentatif les chances d'avoir une réponse augmentent considérablement. 😉

C'est quoi représentatif ?

- représentatif, même organisation des lignes et des colonnes, mêmes libellés, mêmes noms de feuilles...
- anonymisé, pas de données personnelles réelles tels nom, n° sécu, adresse ... remplacé par Nom1, Nom2 etc ....
- simplifié, une quinzaine de lignes reproduisant l'ensemble des différents cas envisageables (Avec le résultat souhaité éventuellement)

Si cela fonctionne sur le fichier fourni et pas sur le vrai fichier c'est qu'il n'est en rien représentatif ou que tu n'as pas su transposer ce qui devrait être un simple copier coller du code.

Bonne lecture

Bonjour Phil69970
est ce que je peux piquer cette définition pour demander un fichier quand les gens posent des questions brutes de décoffrage, svp?

 

[Phil69970]

Bonjour @tbft

est ce que je peux piquer cette définition pour demander un fichier quand les gens posent des questions brutes de décoffrage, svp?

Bien sur tu peux je n'ai pas mis de Copyright 😉