J'aimerais laisser à l'utilisateur le choix du format des cellules non protégées d'une feuille protégée. Comment faire?

Pour obtenir le résultat désiré copie cette procédure dans la feuille module de ta feuille de travail. Pour ce faire, un clic droit sur l'onglet de ta feuille et choisis dans le menu déroulant "visualiser le code"

Private sub Worksheet_SelectionChange(ByVal Target As Range)
 
 Dim MaPlage As Range
 Set MaPlage = Union(Range("A1:A10"), Range("C25"),
 Range("D1:G25"))
 
 If Not Intersect(MaPlage, Target) Is Nothing Then
 ActiveSheet.Unprotect
 Else
 ActiveSheet.Protect
 End If
 
 end sub

Important: Pour ce faire tu dois définir l'ensemble des cellules ou plages de cellules où l'usager peut intervenir. Tu as droit à 30 arguments et la ligne qui te permettra de le faire est
celle-ci : Set MaPlage = Union(Range("A1:A10"), Range("C25"), Range ("D1:G25"))
A titre d'exemple : Range("A1:A10") est un argument. Chaque argument peut être une plage de cellules ou cellules indépendantes ( Maximum 30 arguments). Lorsque l'usager sélectionnera une de ces cellules, la feuille sera déprotégée, laissant l'usager une entière liberté et dès qu'il clique sur une cellule non définie dans l'objet "MaPlage" la feuille sera protégée à nouveau.