I need a macro that will reset cells to zero
 

Does anyone have something I could use for the above?

I need a macro that will reset cells to zero
 

If the cells in question have formulas, then you would need to alter the
input cells so that the formulas calculated to zero. If you want any cell
containing a numeric constant to be zero

Sub Resettozero()
Activesheet.usedrange.Specialcells(xlConstants,xlN umber).Value = 0
End Sub

--
Regards,
Tom Ogilvy
"Macro Beginner" <Macro wrote in message
...
Does anyone have something I could use for the above?

I need a macro that will reset cells to zero
 

Hi,

Dim Rg As range
set rg=range("A1:A10")

'To assign Zero (0) ... or any other value to whole range:
Rg.Value= 0

'To clear the range and make it Empty:
'Rg.ClearContents

--
Regards,
Sébastien
<http://www.ondemandanalysis.com


"Macro Beginner" wrote:

Does anyone have something I could use for the above?