?
Solved

"CLEAR" Macro

Posted on 2012-12-29
5
Medium Priority
?
399 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 51

Expert Comment

by:Martin Liss
ID: 38730372
Range(E:I).Select
Selection.ClearContents
0
 
LVL 51

Expert Comment

by:Martin Liss
ID: 38730374
Sorry.

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

Accepted Solution

by:
Saqib Husain, Syed earned 2000 total points
ID: 38730377
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
ID: 38730406
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
ID: 38731333
@ ssaqibh

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

@ everyone

Thank you all for your input.

~ Geekamo
0

Featured Post

Free Tool: IP Lookup

Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

After seeing numerous questions for Dynamic Data Validation I notice that most have used Visual Basic to solve the problem. This suggestion is purely formula based and can be used in multiple rows.
I tried to use the SharePoint app to Import a Spreadsheet and import an Excel sheet into a Team site made in SharePoint 2016. But that just resulted in getting an error message 'Unknown Error'...
This Micro Tutorial will demonstrate in Microsoft Excel how to add style and sexy appeal to horizontal bar charts.
Enter Foreign and Special Characters Enter characters you can't find on a keyboard using its ASCII code ... and learn how to make a handy reference for yourself using Excel ~ Use these codes in any Windows application! ... whether it is a Micr…

593 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