Hi there,

In sheet one, i have simulated a userform to enable users to enter data (at
their request). I am trying to find the most efficient method to take the
data entered in specific rows of Sheet 1, and insert into the last available
row of sheet 2.

Any ideas on how i can accomplish this?
--
Carlee

You can find the last row in sheet2 with

with worksheets("Sheet2")
set rng = .Cells(rows.count,1).End(xlup)
End with

this assumes there will be data in the first column.

After that it should be copy and insert - something you can easily get with
the macro recorder if you don't already know how.

--
Regards,
Tom Ogilvy


"Carlee" wrote:

> Hi there,
>
> In sheet one, i have simulated a userform to enable users to enter data (at
> their request). I am trying to find the most efficient method to take the
> data entered in specific rows of Sheet 1, and insert into the last available
> row of sheet 2.
>
> Any ideas on how i can accomplish this?
> --
> Carlee

Hi

It would be something along the lines of

Sheets("Sheet2").Cells(Rows.Count, 1).End(xlUp).Value =
ActiveCell.Value

Wigi

Sorry, contrary to some boards, the code tags can't be used here it seems.
I'll remember for the future ;-)

Wigi

"Wigi" wrote:

> Hi
>
> It would be something along the lines of
>
>

Sheets("Sheet2").Cells(Rows.Count, 1).End(xlUp).Value =
> ActiveCell.Value

>
> Wigi