Bonjour Amo et le forum,
Dans le module de feuille de chaque feuille, tu places les deux macros suivantes :
Private Sub Worksheet_Activate()
ActiveSheet.EnableSelection = xlNoSelection
ActiveSheet.Protect Password:='***', Contents:=True, UserInterfaceOnly:=True, Scenarios:=True
End Sub
Private Sub Worksheet_Deactivate()
ActiveSheet.EnableSelection = xlNoRestrictions
ActiveSheet.Unprotect Password:='***'
End Sub
La première protége la feuille à son activation ;
La seconde réalise l'inverse.
Un mot de passe est présent : trois étoiles ***
Cordialement
Bernard