"CLEAR" Macro

Geekamo
Geekamo used Ask the Experts™
on
Hello Experts!

I have a spreadsheet, that calculates figures for me on a daily basis.  Each day, I end up clearing out specific cells and/or ranges to bring the spreadsheet back to Day 1.

What would be the macro/code I could copy and paste into my spreadsheet (Yes, I know where to paste a macro, I just don't have a clue how to write it) to clear specific cells & ranges.

IE - I am going to add a button to my spreadsheet, that when pressed does the following...

1.)  "Clear Contents" of range E:I
2.)  "Clear Contents" of range C7:C8
3.)  "Clear Contents" of cell C10

Is this possible?

Thank you in advance for your help!

~ Geekamo
Comment
Watch Question

Do more with

Expert Office
EXPERT OFFICE® is a registered trademark of EXPERTS EXCHANGE®
Martin LissOlder than dirt
Most Valuable Expert 2017
Distinguished Expert 2018

Commented:
Range(E:I).Select
Selection.ClearContents
Martin LissOlder than dirt
Most Valuable Expert 2017
Distinguished Expert 2018

Commented:
Sorry.

Range("E:I").Select
Selection.ClearContents
If you are using 2007 or above then
From the Developer tab
Insert > Form controls > Button
In the Assign macro window type a name for your macro
Click New
Type this between the Sub and End Sub lines

Activesheet.range("E:I, C7:C8, C10").clearcontents

Open in new window


Close the VBA window
You are now ready to go

If you do not see the Developer tab on the ribbon menu then you have to enable it from the excel settings
After inserting command button into worksheet, say (sheet1),
then double click on the inserted command button and write code and it will look like this,

Private Sub CommandButton1_Click()
    Sheet1.Select
    Columns("E:I").Select
    Selection.ClearContents
    Range("C7:C8").Select
    Selection.ClearContents
    Range("C10").Select
    Selection.ClearContents
End Sub

Now if you click the command button, then you will find the code  will do the real magic for you.

hope this helps.

Author

Commented:
@ ssaqibh

Thank you very much!  Your line of code worked beautifully.

@ everyone

Thank you all for your input.

~ Geekamo

Do more with

Expert Office
Submit tech questions to Ask the Experts™ at any time to receive solutions, advice, and new ideas from leading industry professionals.

Start 7-Day Free Trial