Добрый день! Для определения последней строки в столбце использую код

Sub Макрос1()
   Dim Stroka As Long
       Stroka = Cells(Rows.Count, "AK").End(xlUp).Row
       MsgBox ("номер строки ") & Stroka
End Sub

В столбце у меня 100 строк, 50 из которых со значением, а 50 с формулой со ссылкой на другую ячейку, где пусто. Но последняя строка определяет 100 строк, а не 50. Ячейки где формула показывает пусто, тоже учитывает. Как сделать чтобы учитывало только 50 первых строк, где прописаны значения?