Macro Help Needed - copy only cells with data into specific cell on different sheet

[seilermike]

I'm trying to copy only the data in column "A" in a sheet named "Dups" into another sheet named "InvSummary" in cell "D7". I've tried to write and run a macro but cannot seem to get it to work. The data in column "A" starts in row 1 and could go 2 row or up to 1000. Any/All help is greatly appreciated.

 

[VoG]

Try

Sub btest()
Dim LR As Long
With Sheets("Dups")
    LR = .Range("A" & Rows.Count).End(xlUp).Row
    .Range("A1:A" & LR).Copy Destination:=Sheets("InvSummary").Range("D7")
End With
End Sub

 

[seilermike]

Worked Perfectly! Thank you...