Ne yapmak istediğinizi tam anlamadım ama aşağıdaki kod ile ilgili alandaki boş hücreleri seçerek işlem yapabilirsiniz.

    Dim ws As Worksheet

    Set ws = ActiveSheet

    For Each cell In ws.Columns(1).Cells

        If IsEmpty(cell) = True Then cell.Select: Exit For

    Next cell