problem in macro recording copy and paste in new excel file,

Why do you need to copy and paste to a new workbook? Why not just save it with a new workbook name. Now you have two workbooks exactly the same.

Additionally, you have not provided us with any code showing what your code is doing or not doing.

Sub Macro1()
'
' Macro1 Macro
'

'
    Selection.End(xlUp).Select
    Selection.End(xlToLeft).Select
    Range("A1:O31").Select
    Selection.Copy
    Workbooks.Add
    ActiveSheet.Next.Select
    ActiveSheet.Paste
    ActiveSheet.Previous.Select
    Windows("COPY TO NEW EXCEL.xlsx").Activate
    ActiveSheet.Previous.Select
    Range("A1:M26").Select
    Application.CutCopyMode = False
    Selection.Copy
    Windows("Book2").Activate
    ActiveSheet.Paste
    Range("A1").Select
    Windows("COPY TO NEW EXCEL.xlsx").Activate
    Selection.End(xlToLeft).Select
    Selection.End(xlUp).Select
    ActiveSheet.Next.Select
    Range("A1").Select
End Sub

To tell you the fact i have a excel with multiple sheet, all data's are very sensitive, i cant submit my original excel to my leader, just i want copy particular two sheet data's to new excel file and save in sheet 1 and sheet 2, its very simple work, but i want know how to copy and paste in new excel, if i know i will use for another one use..,

http://lmgtfy.com/?q=Excel+VBA+copy+and+paste+sheets