Copy past special values

[nisselyo]

Is there a way in a macro to copy then past special values (to get rid of all formulas) on multiple pages without having to do it to each page individually.
ie this is what I have now for 3 pages.

Sheets("Portfolio Rates").Select
Cells.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

Sheets("Price Adjusters").Select
Range("A1:AC60").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

Sheets("Rate Generator").Select
Cells.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

 

[Andrew Poulsom]

You can Group the sheets - the macro recorder will give you the VBA code.

 

[nisselyo]

Thanks