Hi Kaj,

Am Fri, 1 Nov 2013 09:57:30 GMT schrieb :

Range A1:A1000
Jump to next row which is empty
Jump one row forwards
Write the number "1"

Jump to next row which is empty
Jump one row forwards
Write the number "2"

what should happen if the row below the empty row has any entry?

Then I need another macro that will be able to find and delete all of the
numbers entered.

Why do you want to enter numbers if you then want to delete them?

Regards
Claus B.
--
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2