Macro button that copies the last column of a table including their formulas onto the end of the table continuously?

[Hasanul]

I really need help () to create a button that lets me continuously copy and paste columns from the end of a table. So each time I hit the button it will copy the last 2 columns and paste them into the next 2 columns and again and again using the same button.

I have been able to make a button that does it once () but then it copies the same cells and pastes in the same place it doesnt move across the table ()

I have attatched two screenshots that hopefully help illustrate what I really need .

Really appreciate any help, thank you

 

[jkpieterse]

I suspect removing this line from your recorded code would've done the job:

I see where it fails, this should work:

Sub Test2()
'
' Test2 Macro
'

'
Range("A2").Select
Selection.End(xlToRight).Select
Range(Selection.offset(,-1), Selection.End(xlDown)).Select
Selection.Copy
Selection.End(xlToRight).Select
Selection.End(xlToRight).Select
Range("XFD2").Select
Selection.End(xlToLeft).Select
Selection.Offset(,1).Select
ActiveSheet.Paste
End Sub