Copy and paste worksheet, headers and footers

[Pookiemeister]

As the title states, how can I copy and paste along with any headers and footers from a excel worksheet and paste in another workbook? Without recording a macro and with an unknown footer and/or header placement location. Thank you

 

[Jambi46n2]

Have your active worksheet open and run this code:

Sub CopyPasteNewWB()
    Cells.Select
    Selection.Copy
    Workbooks.Add
    ActiveSheet.Paste
End Sub

If there's a specific workbook in mind you'll need to declare it as a variable, and paste into it's worksheet.