Need dynamic range select and copy Paste

I am new to macro and need help.....
the requirement is...i have 2 excel sheets...having dynamic number of rows and columns...
Now i want to copy and paste the second sheet's column and cells below it into the first sheet after the last column of first sheet...
For Example.....
IF my sheet1 has columns starting D to M...and my sheet2 has columns starting D to E.....
so after macro my first sheet should have columns from D to O....
Please note that The number of columns in sheet 1 & 2 are dynamic so i can't fix the paste column as N.....

Please help

Maybe:

Sub rags_rags()
Sheets("Sheet2").Range(Cells(2, 4), Cells(ActiveSheet.UsedRange.Rows.count, ActiveSheet.UsedRange.Columns.count + 1)).Copy Sheets("Sheet1").Cells(2, Sheets("Sheet1").UsedRange.Columns.count + 1)
End Sub