Got It!
I was trying to make it too difficult....
Sheets("Sheet1").Select
Range("A1").Select
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
Selection.Copy
Sheets("Main").Select
Range("A1").Select
Selection.Insert shift:=xlDown
ActiveSheet.Paste
Range("A1").Select
Sheets("Sheet2").Select
Range("A1").Select
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Main").Select
Range("A1").Select
Selection.Insert shift:=xlDown
Range("A1").Select
Bookmarks