You should never ever ever do this. There are two problems here.
First, this macro will clear the contents of a selection no matter what worksheet or what file is currently active. Your macro appears to be designed to work on a specific sheet, so you should explicitly use that sheet here by inserting the line
Second, you have established a shortcut for this macro as CTRL+r, which is the default Excel shortcut for "fill right". It is not a good idea to re-use existing shortcuts.
I had your file open when I was working on another file for work, and when I selected a range and hit CTRL+r to fill right, your macro executed and deleted my data.
Bookmarks