Verrouiller une feuille excel

[ChristopheM13]

Bonjour à tous.
Voila j'ai un classeur excel, chaque feuille correspond à une semaine. Je souhaiterais empécher la modification de la feuille de la semaine S+1 à partir du jeudi afin qu'aucune modification soit apporté.

Est ce possible par macro, actuellement je le fait manuellement.


Merci pour votre aide

Christophe
cmagnier@mac.com

 

[joss56]

Re : Verrouiller une feuille excel

Bonjour,

Essaye ça:
If Weekday(Date) = 5 Then
Sheets("Feuil2").Protect
End If

Tu remplaces Feuil2 par le nom de ta feuille

 

[ChristopheM13]

Re : Verrouiller une feuille excel

Merci.
Pour l'aide je vais essayer de mettre en application

 

[JNP]

Re : Verrouiller une feuille excel

Bonjour ChristopheM13 et joss56 🙂,
La proposition de Joss fonctionnera très bien pour bloquer la feuille si on l'ouvre le jeudi, mais ne tient pas compte de la date absolue (si je consulte un jeudi la feuille s+2, elle sera bloquée aussi...). Je pense que la demande était plutôt pour ne bloquer que la semaine s+1 (voir les semaines passées). Je pense qu'il faudrait plutôt un test sur la date actuelle (Now) que tu pourrais mettre dans les évènements de tes feuilles.

Private Sub Worksheet_Activate()
' Date est la valeur de la cellule du premier jour de la semaine de la feuille
If Now > Date - 4 Then ActiveSheet.Protect ("Mot de passe")
End Sub

A te lire 😎

 

[ChristopheM13]

Re : Verrouiller une feuille excel

Merci je vais essayer de mettre en application maintenant