Finding and selecting first empty row

Hi guys,

I'm pretty new to this, so this might be a ridiculously simple question, but I've been trying to write a macro that will take a few cells from one sheet, and paste into the first empty row in a master sheet in the same workbook. From other recommendations, this is what I have so far:

Please Login or Register  to view this content.

The problem is that, well, it doesn't work! I read that other people have used the Cells(Rows.Count, 1).End(xlUp). Offset(1).Select to get the first empty row, but it doesn't seem to be working for me. Can anyone point me in the direction of a solution? It'd be greatly appreciated

The code works fine. I suspect that it just isn't doing what you think it is.

Please Login or Register  to view this content.

From whatever is the current (active) cell, move across 4 cells and select 5 cells on the same row

Please Login or Register  to view this content.

copy the selected cells

Please Login or Register  to view this content.

select the CAPA Index sheet

Please Login or Register  to view this content.

go to the bottom of column 1 and go up to the last non-blank cell, then go down one row and across 2 columns and select the cell

Please Login or Register  to view this content.

paste the copied data.



It works but it will depend on the starting point for the copy.


Regards, TMS

Note that the code could be replaced with this:

Please Login or Register  to view this content.

Regards, TMS