Reset cellule après verrouillage feuille

Hello,

Je souhaite pouvoir reset les cellules dans ce code sur une feuille verrouillée par mot de passe mais je ne sais pas comment faire, vous pouvez m'aider svp ? :)

Ma commande fonctionnelle ci-dessous :

Sub Reset()
    Dim rng As Range

    With Sheets("Saisie")
    Set rng = Range("G6:I6, H13:I13, H14:I14, H15:I15, C20:D20") ' Exemple : Fusion des cellules A1 et B2

    rng.UnMerge ' Annuler la fusion

    rng.ClearContents ' Effacer le contenu des cellules individuelles

    rng.MergeCells = True ' Refusionner les cellules
        With Sheets("Saisie")
            Range("E20, F20, N6:N9").ClearContents ' Exemple avec 3 cellules isolées
        End With
    End With
End Sub

Merci d'avance.

Solution trouvé après avoir posté le message, désolé du dérangement :)

Sub Reset()
    Dim rng As Range

    With Sheets("Saisie")
    .Unprotect "Password"            'enlever protection avec mot de passe
    Set rng = Range("G6:I6, H13:I13, H14:I14, H15:I15, C20:D20") ' Exemple : Fusion des cellules A1 et B2

    ' Annuler la fusion
    rng.UnMerge

    ' Effacer le contenu des cellules individuelles
    rng.ClearContents

    ' Refusionner les cellules
    rng.MergeCells = True
        With Sheets("Saisie")
            Range("E20, F20, N6:N9").ClearContents ' Exemple avec 3 cellules isolées
        End With
        .Protect "Password"              'mettre protection avec mot de passe
    End With
End Sub

Bonjour,

Pas de soucis (c'est la bonne méthode), vous pouvez marquer votre second post comme solution. Bonne journée.