Create a button to Clear Cells

[Guest]

Hello,

Can anyone help me set up a button and macro to clear cells where data is
entered.

Lets say, I'm looking to clear Cells A1,B1,C1 and A3, B3, C3.

Remember I would still need a button that would then prompt the Macro.

 

[Guest]

1) Record yourself clearing the cells, as follows
Tools
Macro
Record New Macro
Select the cells
Press delete
Stop recording the macro.

2) Create button as follows
View
Toolbars
Form
From the forms bar select the button icon
Drag out a rectangular button
Once you have dragged it out a pop up will appear asking you to assign
a macro.
Select the macro you recorded in step 1)

Finished.
Any probs. Post back

 

[Franz Verga]

Hello,

Can anyone help me set up a button and macro to clear cells where
data is entered.

If you don't need to use it in a macro, but in your regular use of Excel,
you can simply customize your toolbar to add the buttons you need. For
Example, right click on a toolbar, choose Customize, from the left colum
choose Edit and then from the right you can choose the Clear Conten or the
CLear Format button and you can drag & drop it on your favorite toolbar...


--
Hoping to be helpful...

Regards

Franz Verga

 

[David McRitchie]

The newsgroup for macros is excel.programming
Sorry didn't look very carefully, as I see that question was
answered; however, this is a bit different.

If those are the ONLY cells you want to clear, then i presume this is only
for one worksheet. So you could create a shape on the worksheet
itself and assign the macro to it by right-clicking on the shape.

Here is a macro that is invoked by a double click event on the
worksheet. Install to the worksheet by right click on sheet tab, view code.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Range("A1,B1,C1 , A3, B3, C3").ClearContents
End Sub

If you want a macro to assign to a shape or to a button

Sub Clear_a1b1c1a3b3c3()
Range("A1,B1,C1 , A3, B3, C3").ClearContents
End Sub

to create a shape or a toolbutton see
http://www.mvps.org/dmcritchie/excel/toolbars.htm

If you want something along the lines of removing constants from a selection

on error resume next
Selection.SpecialCells(xlConstants).ClearContents
on error goto 0