VBA to find first row under header, after filter has been applied.

Hi All...

Very trivial question, but its bugging me a lot....

I currently run the below code...

<sub>ActiveSheet.Columns("A:C").AutoFilter Field:=3, Criteria1:="<>DATA", Operator:=xlAnd
ActiveSheet.Columns("A").AutoFilter Field:=1, Criteria1:="<>"

Range("C21").Select


ActiveCell.Formula = "=VLOOKUP(A21,'DATA'!$G:$V,16,0)"
Dim LastRow As Long
LastRow = Cells(Cells.Rows.Count, "A").End(xlUp).Row
Range("C21:C" & LastRow).FillDown</sub>

Which basically autofilters, then runs a vlookup on C21 and autofills down.
However C21 is likely to change on a daily basis after my autofilter is run....

I am trying to figure out my code to say Autofilter / Find first row after Row B (a+b both being headers) / go to column C, and then run Vlookup and fill down.

Any help or tips would greatly be appreciated.

Thank you kindly

Apologies.... the tag icon was not on my screen.... not intentionally ignored.

I have manually put the code tags in, and hope this works once posted.

Thank you kindly


Hi All...

Very trivial question, but its bugging me a lot....

I currently run the below code...

[code]ActiveSheet.Columns("A:C").AutoFilter Field:=3, Criteria1:="<>DATA", Operator:=xlAnd
ActiveSheet.Columns("A").AutoFilter Field:=1, Criteria1:="<>"

Range("C21").Select


ActiveCell.Formula = "=VLOOKUP(A21,'DATA'!$G:$V,16,0)"
Dim LastRow As Long
LastRow = Cells(Cells.Rows.Count, "A").End(xlUp).Row
Range("C21:C" & LastRow).FillDown[code]

Which basically autofilters, then runs a vlookup on C21 and autofills down.
However C21 is likely to change on a daily basis after my autofilter is run....

I am trying to figure out my code to say Autofilter / Find first row after Row B (a+b both being headers) / go to column C, and then run Vlookup and fill down.

Any help or tips would greatly be appreciated.

Thank you kindly

Please Login or Register  to view this content.