Next Bland Row

[johnbird1988]

Hello

How do I find the next blank row when the data is filtered?

At the moment my code would find the last item in the filtered list and then select the row underneath it nowever this is not the loast row.

Please Help

Thank you

John

 

[kpark91]

Dim LastRow&, nextBlankRow&
LastRow = Range("A" & Rows.count).End(xlUp).Row
nextBlankRow = LastRow + 1

 

[prajul89]

So that blank Row is visible or not??

 

[Weaver]

Darn it, I really was hoping to answer a question about a bland row.

I have a lot of experience, since most of my data is really bland!

 

[johnbird1988]

Thank you for the reply. I know how to find the next blank row but if you filter this range and them try and find the next blank row it does not.

This code only find the next blank row but does not work when the data has a filter

Dim LastRow&, nextBlankRow&
LastRow = Range("A" & Rows.Count).End(xlUp).Select
nextBlankRow = LastRow + 1

Thank you

John

 

[Weaver]

Is the row you're after the first blank row when the data's unfiltered?

Or is it a blank cell in a row that appears as visible once the filter is applied?