Macro pour rétablir données effacer

Salut le forum

J'ai pu avec l'enregistreur créer la macro ci-dessous pour effacer les données contenues dans des cellules.

Sub EFFACER_MACRO2()
'
' EFFACER_MACRO2 Macro
'

'
    Range("B4:B49").Select
    ActiveWindow.SmallScroll Down:=-5
    Range("B4:B49,E27,E33,E35").Select
    Range("E35").Activate
    Selection.ClearContents
    Selection.ClearContents
    ActiveWindow.LargeScroll Down:=-2
    Range("B4").Select
End Sub

Je veux donc avoir une macro pour rétablir les données effacées au cas ou je viendrai par megar cliquer sur effacer.

Merci

Bonjour

Pourquoi ne pas mettre un message demandant confirmation (Vbyesno)

tu as la méthode et l'exemple en début de cette page

https://www.excel-pratique.com/fr/vba/boites_de_dialogue.php

Cordialement

Salut amedéus et le forum

Merci pour le guide.

J'ai trouvé la solution à mon problème.

God bless