Problem with Macro to Copy Data Rows

[zenjah]

Hi there,

I've used the following macro to copy data from templates people fill out and paste into a master file.

With wb.Sheets("Details")
    .Range("A5:I" & .Range("D5").End(xlDown).Row).Copy
End With

The data starts from row 5 and I used column D to decide which rows to copy and paste

It works fine for spreadsheets that have 2 or more rows filled out. However, it doesn't seem to work for some spreadsheets that have 1 row of data only. Is there anything I can do to make this work for spreadsheets with 1 row of data?

Thanks in advance for your help