OK, you want to merge just those two subs into a single sub, and be able to assign it to a button. I thought you wanted to merge them into your other code.
Where is the button going to be? If you have one button, it has to have a way to indicate which sheet you want to run that code on. It can't just be the active sheet, because the sheet with the button is going to be the active sheet.
If you have a button on every sheet, you can create an ActiveX button in every sheet named CommandButtonErase and use this in every sheet:
Then in Module1 add this code:
If you instead use Forms buttons, then you can do Assign Macro and select Erase.
Bookmarks