Hi Sean,

I'm afraid I'm not quite sure what your question is. If you're asking how
you can pass a dynamic range address then:

'Your loop to determine last row - Last row = X

Dim sRange As String

sRange = "A7:K" & X

Wks.("Sheet2").Range(sRange)......

If you're asking how to find the last row then you probably need to post
another question telling people on what basis you 'find' the last row (ie
blank "" or a particular value etc.)

Hope it's the first!

Best regards

John



"SWT" wrote in message
ups.com...
I have a spreadsheet with data in Sheet 2 Range (A4:K6) that I want to
copy to Sheet 2 Range (A7:K*) (* being the variable that will change
each time the macro is run. The * is determined by the number of rows
of data in Sheet 1). I have accomplished this task by using loops, but
it takes too long to complete the macro. I am now trying to have the
data copied to the specified range in one paste.

Sean