Macro pour valider un onglet

bonsoir,

Je souhaiterais savoir s'il est possible de verrouille un onglet avec une macro pour valide et devalide si besoin avec la cellule H66.

Je n'arrive pas à ouvrir ton fichier...

Mais de manière générale, on verrouille une feuille:

Sheets("Feuil1").Protect

avec mot de passe:

Sheets("Feuil1").Protect Password:="MonMotDePasse"

Pour déverrouiller:

Sheets("Feuil1").Unprotect

avec mot de passe:

Sheets("Feuil1").Unprotect Password:="MonMotDePasse"

peux tu l'ouvrir?

julien35000 a écrit :

peux tu l'ouvrir?

Oui.

Et que veux-tu faire avec la cellule H66 au juste?

H66 quel valide l'onglet actif et par exemple h67 dévalide

mot passe "cisdol"

texte de la case h66 "validtion chef de centre"

julien35000 a écrit :

H66 quel valide l'onglet actif et par exemple h67 dévalide

mot passe "cisdol"

---

texte de la case h66 "validtion chef de centre"

En remplissant la cellule par une valeur?

Dans ce cas, tu peux le faire via l'event Worksheet_Change avec le code que j'ai posté plus haut.

Private Sub Worksheet_Change(ByVal Target As Range)

  If Target.Cells.Count > 1 Or IsEmpty(Target) Then Exit Sub

    If Target.Address = "H66" Then

      If Target.Value = "validtion chef de centre" Then ActiveSheet.Protect Password:="cisdol"

    ElseIf Target.Address = "H67" Then

      If Target.Value = "Invalider" Then ActiveSheet.Unprotect Password:="cisdol"

    End If
End Sub

Tu copies ce code dans chaque feuille. Ensuite, si on inscrit "validtion chef de centre" dans la case H66, il verrouillera le tab. En inscrivant "Invalider" dans la cellule H67, le tab sera déverrouillé.

N'oublie pas de déverrouiller les deux cases (H66 e H67) pour pouvoir y écrire.

es ce possible de le faire avec un bouton?

sa fonctionne pas ou c'est surement moi