Hey all,

How would I copy a certain amount of rows (customer data info) from a
workbook to paste into a master database based on a cell which
indicates the number of rows?

For example, I have a worksheet with 15 rows of customer data. I just
want to copy 4 rows - (this is based on a cell in A1 signifying I want
only the first 4 rows copied.) Based on that, I'd run a macro which
would copy only those 4 rows (starting from rows 3 to row 6) and paste
them into a master database. The paste will happen at the next row from
the end of the master database.

Thanks for your help in advance.

You may like this. Works from the active cell. the ,7 is the number of
columns to the right

Sub copyvarrows()
num = InputBox("Number of rows")
With Sheets("master")
lr = .Cells(.Rows.Count, "a").End(xlUp).Row + 1
ActiveCell.Resize(num, 7).Copy .Rows(lr)
End With
End Sub
--
Don Guillett
SalesAid Software
(E-Mail Removed)
<(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
> Hey all,
>
> How would I copy a certain amount of rows (customer data info) from a
> workbook to paste into a master database based on a cell which
> indicates the number of rows?
>
> For example, I have a worksheet with 15 rows of customer data. I just
> want to copy 4 rows - (this is based on a cell in A1 signifying I want
> only the first 4 rows copied.) Based on that, I'd run a macro which
> would copy only those 4 rows (starting from rows 3 to row 6) and paste
> them into a master database. The paste will happen at the next row from
> the end of the master database.
>
> Thanks for your help in advance.
>