Annette, something like this, will select the next row down in column A
Range("A65536").End(xlUp).Offset(1, 0).Select
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003


"Ed" wrote in message
om...
Hi

I have a macro that extracts data from Outlook and inserts it into an
excel worksheet. Please can somebody tell me what to put in the macro
so that it looks for the first blank row and then adds the data? In
other words, appends the new data at the end of the existing rows. If
I need to provide more information, please let me know. Many thanks
in advance. Annette.