Formula/Macro to place data on the next blank row

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Amotif - 11 May 2008 07:38 GMT

Hi everyone,
I'll be grateful if someone can help me set up a formula/macro through which
data can be placed on the next blank row. My intention is to create a
database of info and update the list sometime before I choose new dat (ie,
the existing quotation details can be saved in the database before the new
quotation is generated).
Thanks.

Reply to this Message

Gary''s Student - 11 May 2008 12:30 GMT

The following takes user input and placesit in the next available cell in
column A. You can adapt the technique to your needs:

Sub hfdsjf()
n = Cells(Rows.Count, "A").End(xlUp).Row + 1
v = Application.InputBox(prompt:="enter value", Type:=2)
Cells(n, "A") = v
End Sub

Signature

Gary''s Student - gsnu200785

> Hi everyone,
> I'll be grateful if someone can help me set up a formula/macro through which
[quoted text clipped - 3 lines]
> quotation is generated).
> Thanks.

Reply to this Message

Amotif - 12 May 2008 03:10 GMT

Great!
Could this also be applied to place data in a number of rows (ie columns A
to X) in one hit?

> The following takes user input and placesit in the next available cell in
> column A. You can adapt the technique to your needs:
[quoted text clipped - 12 lines]
> > quotation is generated).
> > Thanks.

Reply to this Message

Rate this thread: