copy worksheet with formulas but not data

C

Candyk

I have a worksheet with formulas that I need to copy for each month.
The worksheet is filled in with data, but I only want the formulas, lables,
headings, formats etc not the actual data.
How can I do this?
Any help is appreciated greatly.
 
G

Gary''s Student

How about copying the worksheet exactly and then clearing all the data?
After copying, enter and run this small macro:

Sub clearit()
Dim r As Range
For Each r In Selection
If IsNumeric(r.Value) Then
If r.HasFormula Then
Else
r.Clear
End If
End If
Next
End Sub

It will clear numbers, but l;eave formulae and text alone.
 
C

Candyk

Thank you!
Works great.
Sincerely, Candyk

Gary''s Student said:
How about copying the worksheet exactly and then clearing all the data?
After copying, enter and run this small macro:

Sub clearit()
Dim r As Range
For Each r In Selection
If IsNumeric(r.Value) Then
If r.HasFormula Then
Else
r.Clear
End If
End If
Next
End Sub

It will clear numbers, but l;eave formulae and text alone.
 
Top