Найдите ячейки на одном листе и скопируйте строки на другой лист

У меня есть лист с именем Backlog, содержащий строки и столбцы данных. Мне нужен код, который будет искать строку за строкой от 2-го до последнего столбца в поисках # N / A. Когда он находит # N / A, ему нужно проверить последний столбец, содержит ли он C или нет. Если он содержит C, тогда вся строка должна быть добавлена ​​к листу с именем Logoff. Если последний столбец не содержит C, тогда вся строка должна быть добавлена ​​к листу с именем Denied. Строка должна быть удалена из исходного листа журнала невыполненных работ после перемещения в «Выход из системы» или «Отклонено». Код у меня ниже не работает. После первого оператора For он переходит в End Sub, но ошибок компиляции нет.

Private Sub CommandButton2_Click()
    Dim IMBacklogSh As Worksheet
    Set IMBacklogSh = ThisWorkbook.Worksheets("Backlog")
    Dim logoffSh As Worksheet
    Set logoffSh = ThisWorkbook.Worksheets("Claims Logged off")
    Dim deniedsh As Worksheet
    Set deniedsh = ThisWorkbook.Worksheets("Claims Denied")

    IMBacklogSh.Select
    Dim i As Long
    For i = 3 To Cells(Rows.Count, 13).End(xlUp).Row
        If Cells(i, 13).Value = "#N/A" Then
            If Cells(i, 14).Value = "C" Then
            IMBacklogSh.Rows(i).EntireRow.Copy Destination:=logoffSh.Range("A" & logoffsh.Cells(Rows.Count, "A").End(xlUp).Row + 1)
            Else
            IMBacklogSh.Rows(i).EntireRow.Copy Destination:=deniedsh.Range("A" & deniedsh.Cells(Rows.Count, "A").End(xlUp).Row + 1)
            End If
        End If
    Next i
End Sub