Find lat row in a column that has blanks in between

[drop05]

I am trying to find the last row used in a column however the column has values then blanks then values and it is not getting the last last row used instead going to the first blank in that column, is there a way to get the last last row used?

  Dim FNames As Variant
  Dim Cnt As Long
  Dim Wbk As Workbook
  Dim MstWbk As Workbook
  Dim Ws As Worksheet
  Dim lRow As Long
  
  
  Set MstWbk = ThisWorkbook
  Set bothColumns = shtCompare.Cells(2, 1)
  
  lRow = Sheets("Compare").Range("A" & Rows.Count).End(xlUp)

 

[Joe4]

You are missing the ".Row" part.

lRow = Sheets("Compare").Range("A" & Rows.Count).End(xlUp).Row