Sub noform()
For Each ws In Worksheets
ws.Select
Cells.Copy
Cells.PasteSpecial Paste:=xlPasteValues
Next
End Sub

will remove all formulas in the worksheets
--
Gary''s Student - gsnu200745


"Matthew" wrote:

In Excel we use a lot of formulas that link to our database and not everyone
who gets the excel sheets has the database. I want to write a macro that will
select every sheet in the workbook, select all cells and paste values. But
because the sheet names and the number of them are usually different i need
it to know to pick all the sheets availanle? Can anyone help with the
coding?!?