Copy and paste values and number formats pastes formatting

Hello, I made a macro that prints a formula sheet from a more complex information sheet. Most everything works except the Selection.PasteSpecial script leaves the source formatting. The script is below. I tried altering the "Selection.PasteSpecial Paste:=xlNumberFormats, Operation:= _xlNone, SkipBlanks:=False, Transpose:=False" line by making two lines, one for values and the other for number formats. This lead to another error.

Sheets("Version 1").Select
Range("A7:J78").Select
Selection.Copy
Sheets("Kitchen Print").Select
Range("A7").Select
ActiveSheet.Paste
Selection.PasteSpecial Paste:=xlNumberFormats, Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False
Range("G6:G57").Select
Application.CutCopyMode = False

Any help would be greatly appreciated.