Thread
:
Copy and Paste in steps
View Single Post
#
2
Posted to microsoft.public.excel.programming
Don Guillett
external usenet poster
Posts: 10,124
Copy and Paste in steps
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
wrote in message
ups.com...
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.
Reply With Quote
Don Guillett
View Public Profile
Find all posts by Don Guillett