You can use code like this to find the next available row.

dim NextRow as long
with worksheets("someworksheetnamehere")
Nextrow = .cells(.rows.count,"A").end(xlup).row + 1

.cells(nextrow,"A").value = "whatevergoes here"
.cells(nextrow,"B").value = "something here, too"
end with

If you're going to make this automatic, remember that you'll probably need
something that deletes data from the worksheet after a typing mistake, and
changes data in existing rows.

I've just found it much simpler to regenerate those separate worksheets after
I've done all my data entry and verified my input.

Good luck,


Theguyfromnj wrote:

Thank you for your reply, but this shreadsheet is used by many in the
office, and it is sent to corp at the end of each day, so I can not
change the format. All I am looking to do is be able to input the data
once and have the data go to the different cells on the different
sheets. On the summary sheet, each entry has to advance to the next
un-used row, so as not to overwrite the data that already exists.

The perfect solution to me would be:

A single form that can be filled out, and have the data copy to the
different specified cells, and when being copied to the summary sheet
automaticaly advance to the next unused row and paste the data.

I am not sure if all this can be done. I am sure the form would be
easy enough, but the summary sheet is my biggest problem. How do you
tell excel to paste data to the next row that doesnt contain data?

--
Theguyfromnj
------------------------------------------------------------------------
Theguyfromnj's Profile: http://www.excelforum.com/member.php...o&userid=35700
View this thread: http://www.excelforum.com/showthread...hreadid=554849

--

Dave Peterson