Hi I am not sure I understood You but check this and give the info is it ok?
Sub aa()
Dim lastf As Long
Dim x As Long
lastf = Cells(Rows.Count, "F").End(xlUp).Row
For x = lastf To 1 Step -1
    If IsEmpty(Cells(x, 6)) Then
    Cells(x, 6).EntireRow.Delete
    End If
   Next
End Sub