Protection d'une partie de feuille
Bonjour et bonne année à vous tous qui me lirez
De la même manière qu'il est possible de protéger une feuille, est-il possible de protéger une partie de feuille/quelques cellules seulement (par une commande basique ou une macro si besoin est) ?
Par exemple, imaginons un tableau avec deux cellules (A1 et A2) à remplir et un bouton en B1. On rempli A1, le bouton en B1 a pour but de valider l'information (si la case est vide, la case A2 n'apparait pas). Si la case A1 est validée, la case en A2 apparait ET la case en A1 se protège de toute modification.
Merci d'avance
Bonsoir
Par défaut toutes les cellules d'une feuille sont verrouillées
Le fait de protéger ta page quand tu as un texte en A1 protégera ta cellule A1 ainsi que toutes les autres, sauf celles que tu as déverrouillées
Bonsoir,
En rajoutant sa dans ton premier code pourrai peut etre faire l'affaire !
Sub Bouton1_Clic()
ActiveSheet.Unprotect "123"
Range("A1").Select
Selection.Locked = True
If Cells(1, 1).Value <> 0 Then
Rows("2:2").EntireRow.Hidden = False
Else
Rows("2:2").EntireRow.Hidden = True
End If
ActiveSheet.Protect "123", True, True, True
End SubCordialement
Merci pour vos réponses !
Celles ci m'ont aiguillé et m'ont permis de trouver la solution à mon problème. Voici ma solution :
- Premièrement, verrouiller la page entière
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
- Ensuite, créer une exception dans le verrouillage
ActiveSheet.Protection.AllowEditRanges.Add Title:="Nom de la plage d'exception", Range:=Range("Plage d'exception")
Bonne journée