Copy Paste a sheet to new workbook

[Manos]

Dear all

i do not have to many knoweldeges for vb.
what i am looking for is that: I have a workbook with many sheets where i
fill on specific sheet with to many formulas (Sheet 1).
There is any way to have a macro where to copy this sheet exactly as it is,
into a new workbook, but without the formulas? (copy paste values and
formats).

Thanks in advance
Manos

 

[reklamo]

Hi Manos

Try this:
' Copy active sheet in a new workbook
ActiveSheet.Copy
' Select the complete sheet and copy it
Cells.Select
Selection.Copy
' Paste the complete sheet as values
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False

Regards
reklamo

 

[Manos]

Thank you very much

Hi Manos

Try this:
' Copy active sheet in a new workbook
ActiveSheet.Copy
' Select the complete sheet and copy it
Cells.Select
Selection.Copy
' Paste the complete sheet as values
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False

Regards
reklamo