Merging tables from different worksheets

[kYMiNARA]

This is my first post so I hope I dont ask something that has been asked a thousand times......

I've 5 tables all of the same format on different worksheets. I want to collate them all onto one sheet. I decided that writing a Macro would be best, but I couldn't figure it out. I've had a few goes at it but cannot get it right.

Can anyone help me?

[nazmul_muneer]

Can you provide sample?

[kYMiNARA]

Here the example I have so far - this is just for one sheet but I wanted to repeat this for all relevant spreadsheets:

'
Sheets("Sheet4").Select
Range("A2").Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.Copy
Sheets("All Table").Select
Range("A2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

End Sub

The problem I am having is when pasting in the 2nd,3rd,4th....sheets as I do not know the code to find the first empty cell in a particular column.

thanks