Select and copy cells that aren't blank

[oliviar]

Hi Guys,
I'm not sure where to start, so I have no code at all.
I get many workbooks each week with the same format - data in columns A and B. But the number of rows will always vary.
I want to make a macro that will select and copy only the cells with data into them into another workbook (BookX) under the data that is already in BookX - creating a long list.

Any ideas?

 

[oliviar]

I solved it! (I think)
Do you guys agree?

Sheets("Data list").Select
Cells.Select
Selection.SpecialCells(xlCellTypeConstants, 23).Select
Selection.copy
Windows("bookx.xlm").Activate
Worksheets("master list").Cells(Rows.Count, 1).End(xlUp).Select
ActiveCell.Offset(1, 0).Range("A1").Select
ActiveSheet.Paste