Déprotéger que les feuilles sélectionneés

Bonjour le forum,

je souhaiterais déprotéger que les feuilles (onglets) sélectionnées.

Celles ci sont protégées avec un mot de passe (123456)

Comment faire?

Merci à vous.

Oui bonjour, ca serait utile pour moi aussi...

moi aussi je cherche comment faire !!!

S.v.p. quelqu'un a une idée ?

Pour protéger et déprotéger des feuilles sélectionnées dans un classeur ???

Merci beaucoup d'avance

Bonne journée

Bigjuju21

Bonjour, Bonsoir,

Est-ce que quelqu'un connais la réponse ?

Il me semble que je l'ai déjà fait...mais je m'en rappelle plus...entk...je pense !!!

Merci de nous aider !!!

Amicalement

Bigjuju21

Salut le forum

Sub Action()
Dim Feuille As Object
For Each Feuille In Sheets(Array("Feuil2", "Feuil3"))
    Feuille.Unprotect Password:="123456"
Next Feuille
End Sub

Mytå

Salut le forum,

Merci beaucoup,

moi ça répond à ma question.

J'ai figuré que si j'enlevais :(array("feuil2", "feuil3")) et que j'enlevais aussi le "Un" de Unprotect, je pouvais toute protéger mes feuilles en une seule fois.

Mais si j'ai 39 feuilles et je veux protéger de la feuil2 à la feuil 39 mais pas la feuil1,

qu'est-ce qui serait marquer après le (array(???????))

Merci beaucoup, j'espère que ça l'aide aussi Vacoch !

A+

Bigjuju21

Merci à vous deux,

mais cela ne répond pas vraiment à ma demande initiale qui était de déprotéger par mot de passe que les feuilles selectionnées (onglets).

oups...

Bonjour le forum;

Je relance ce post car je n'ai pas trouvé la solution...

merci

Salut le forum

Directement, impossible mais par Userform c'est faisable.

Mytå

Merci Myta mais comment faire?

Merci à vous

Re le forum

Essaye ceci Vacoch, fichier vite fait car pas très en forme aujourdhui.

https://www.excel-pratique.com/~files/doc/USF_Protection.xls

Mytå

Et bien, heureusement que vous nêtes pas très en forme !

Super ce fichier merci Myta!

Rechercher des sujets similaires à "deproteger que feuilles selectionnees"