Solved

"CLEAR" Macro

Posted on 2012-12-29
5
386 Views
Last Modified: 2012-12-30
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
0
Comment
Question by:Geekamo
5 Comments
 
LVL 45

Expert Comment

by:Martin Liss
Comment Utility
Range(E:I).Select
Selection.ClearContents
0
 
LVL 45

Expert Comment

by:Martin Liss
Comment Utility
Sorry.

Range("E:I").Select
Selection.ClearContents
0
 
LVL 43

Accepted Solution

by:
Saqib Husain, Syed earned 500 total points
Comment Utility
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
 
LVL 7

Expert Comment

by:karunamoorthy
Comment Utility
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
 
LVL 1

Author Comment

by:Geekamo
Comment Utility
@ ssaqibh

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

@ everyone

Thank you all for your input.

~ Geekamo
0

Featured Post

IT, Stop Being Called Into Every Meeting

Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

Join & Write a Comment

Introduction This Article is a follow-up to my Mappit! Addin Article (http://www.experts-exchange.com/A_2613.html), it was inspired by an email posting I made to EUSPRIG (http://www.eusprig.org/index.htm), I will briefly cover: 1) An overvie…
Improved? Move/Copy Add-in Replacement - How to avoid the annoying, “A formula or sheet you want to move or copy contains the name XXX, which already exists on the destination worksheet.” David Miller (dlmille)  It was one of those days… I wa…
Viewers will learn the basics of slicers and timelines for both PivotTables and standard Excel tables in Excel 2013.
This Micro Tutorial will demonstrate how to use longer labels with horizontal bar charts instead of the vertical column chart.

763 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

7 Experts available now in Live!

Get 1:1 Help Now