Paste in next empty cell

Hi all.

So far I have this code, to copy the value from sheet1 B4 to sheet2 A17 and Sheet3 A17.

Please Login or Register  to view this content.

Now I wanna make sure, that when I put a new value into sheet1 b4, it pastes the values into the next empty celly in column A of sheet 2 and 3.

I tried the following with help from google (first only for pasting into sheet2, so that it won't become too complicated for a start)

Please Login or Register  to view this content.

I do however get a "object doesn't support this property or method"-error, once sheet2 A17 has a value in it.

Can you guys help me?

Maybe:

Please Login or Register  to view this content.

I just found the mistake myself.. i had to use PasteSpecial in the last command instead of Paste.

Your command looks easier however, what does the "End(3) (2)" stand for though?

It points too the last empty cell in Column A of both sheets.

The (3) is an xl constant for (xlUp)
The (2) is an offset command. The last used cell would be (1). One cell below would be (2) and so on ....
It would be equal to Offset(1) normally used.

Thank you. But how does the programme know to start at A17?

I mean your code works perfectly fine, but I wanna duplicate it for another column, so I need to know just how exactly it works.

It doesn't it looks for the next empty cell. Is there data in A17?

If there's always data in A16 it will choose A17 as the next empty cell and continue to copy down from there. You're welcome. Glad to help out and thanks for the feedback and the rep.