[RESOLU] Erreur annulation demande

[Bosco13]

Bonjour le Forum,

je viens vers vous car je n'arrive pas a creer une macro qui me donne la possibilité d'annuler la protection du format de la feuille
le format est proteger par l'evennement worksheet change suivant :

Private Sub Worksheet_Change(ByVal Target As Range)

'GARDER LE FORMAT FEUILLE ORIGINE : POUR LE COPIER GLISSER ET COPIER COLLER====================================

Dim tablo, sel As Range
On Error Resume Next 'sécurité
Application.EnableEvents = False 'désactive l'action des évènements
tablo = Target 'mémorise les valeurs

Set sel = Selection ' on reselectionne la plage
Application.Undo 'annule le collage
Target = tablo 'rétablit uniquement les valeurs
sel.Select 'plage
Application.EnableEvents = True
' FIN COPIER COLLER / COPIER GLISSER======================================================================
End Sub

Il faudrait une macro ( que je lancerai par un bouton avec MDP pour annuler cette protection
et une deuxieme macro avec mdp egalement pour que je puisse retablir la protection du worksheet change.

je recherche cette fonction pour moi car a la demande des utilisateurs j'ai besoin de rajouter de temps en temps
2 lignes ( qui sont liées) pour eux. ( les mdp c'est pour eviter qu'ils modifie la mise en forme par erreur)

je me pose quand meme la question de savoir si cela est possible.

Je vous remercie d'avance pour votre aide

Bosco