How to create a copy of an Excel file with only values

Question

I was trying the following code to copy & paste only values in each worksheet, but it does nothing.. Why?

Sub onlyvalues

Dim ws as worksheet
For each ws