Saving a work book as values and format only

[stew]

workbook Hi all
I will be finishing a project Soon and I would like to save as Values and
Format only for the whole work book. This would allow me strip out all the
data on the original workbook in readyness to start my New project. Is this
possible?

thanks for Looking
Stew

 

[Luke M]

This macro should cause all cells values to become static.

Sub BecomeStatic()
For Each ws In ActiveWorkbook.Worksheets
On Error Resume Next
ws.UsedRange.Value = ws.UsedRange.Value
Next ws
End Sub

 

[stew]

Would I place this macro in every worksheet?

Thanks for your help

Stew

 

[Luke M]

No, you can place it in a regular module. It is setup to look through every
ws on it's own.