Hi,

I've taken you literally when yo say the 'entire row' and suspect you may
not really mean that bit you should be able to adjust the ranges easilly
enough.

Sub copyDown()
lastrow = Sheets("Data").Cells(Cells.Rows.Count, "A").End(xlUp).Row
Sheets("SBD").range("A2:IV2").AutoFill Destination:=range("A2:IV" & lastrow)
End Sub

Mike

"AmyHomewood" wrote:

I have a workbook with 2 sheets, the purpose of which is to take data from a
seperate file and configure it to enable it to be exported.

Sheet one is "Data" which the user copies data into from the other file, the
length (number of rows) changes each time data is copied in.
Sheet two "SDB" is basically a mapping sheet, the first row is column
headings and the second row has the data taken from "Data" e.g. =Data!AD2.

I want to create a macro to select row 2 and copy it down as many times as
there are rows in the "Data" sheet. I can count how many rows there are but I
can't figure out how to use this variable in the macro.

Thanks in advance,

Amy Homewood