Hi,
Just one more question may I ask.
I know this is closed as solved.
If I want to include other sheets , what will I write??
Current Code
Sub test()
 
 'Turn off screen flashing for speed
Application.ScreenUpdating = False
 
With Worksheets("sheet1")
    Sheets("sheet2").Range("C14:K56").Value = .Range("A2:I45").Value
    Sheets("sheet2").Range("L14:L56").Value = .Range("L2:L45").Value
    Sheets("sheet2").Range("M14:M56").Value = .Range("M2:M45").Value
End With

 'Resume screen updates
Application.ScreenUpdating = True

End Sub
I also want to include copying From 
sheet3 to sheet2 ( From sheet3 A2:E6  to sheet2 J58:M62)
I tried to write and I am not going anywhere.
Any help please
Regards