Bonjour à tous,

j'aimerais savoir comment sécuriser uniquement certaines cellules d'une feuille excel, via VBA. Par exemple, j'ai ma macro :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Private Sub CommandButton1_Click()
 
Worksheets("Feuil1").UsedRange.Rows(1 & ":" & 3).Insert Shift:=xlDown
Worksheets("Feuil1").UsedRange.Rows(1 & ":" & 3).HorizontalAlignment = xlCenter
 
Worksheets("Feuil1").Range("C1").Interior.ColorIndex = 25
Worksheets("Feuil1").Range("C3").Interior.ColorIndex = 22
Worksheets("Feuil1").Range("D2").Interior.ColorIndex = 6
 
End Sub
Qui crée 3 cellules colorées. J'aimerais rajouter un bout de code pour que ces cellules soient protégées (l'utilisateur ne peut pas y toucher) alors que le reste de la feuille reste accessible.
Savez vous comment je peux m'y prendre? J'ai déjà fouillé sur Internet et sur l'aide VBA mais je n'ai pas trouvé.

Merci d'avance pour vos réponses,

Cordialement