On Tuesday, October 16, 2012 7:46:42 AM UTC-5, pcorcele wrote:
I need a macro that will copy an Excel worksheet from A1 to the bottom of col J: then create a new worksheet and paste that data in the new work sheet. Thanks for the help and much appreciated

.

copy this to the sheet module
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address < Range("a1").Address Then Exit Sub
Target.Copy Cells(Rows.Count, "j").End(xlUp)(2)
'copy ???? to new worksheet and WHY
End Sub