"CLEAR" Macro

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
LVL 1
GeekamoAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
Advertise Here
 
Saqib Husain, SyedConnect With a Mentor EngineerCommented:
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
0
 
Martin LissOlder than dirtCommented:
Range(E:I).Select
Selection.ClearContents
0
 
Martin LissOlder than dirtCommented:
Sorry.

Range("E:I").Select
Selection.ClearContents
0
 
karunamoorthyCommented:
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.
0
 
GeekamoAuthor Commented:
@ ssaqibh

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

@ everyone

Thank you all for your input.

~ Geekamo
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.