Help with Range formula to last row.

[Kayslover]

Hi all,

I have the following which is in a macro for a Filter.

ws.Range("D4:D1000 ").AutoFilter Field:=4, Criteria1:=""

Is it possible to change the D1000, in the formula to point to the last row in Column D?

Just before the ws.Range I have

LastRow = ws.Range("D" & Rows.Count).End(xlUp).Row

I have tried

ws.Range("D4:D&LastRow").AutoFilter Field:=4, Criteria1:=""

and I get a “Runtime error 1004, Method ‘Range’ of object_Worksheet failed.

 

[Kayslover]

Joe4,

Thank you for your help. Sorted. ?