Encontre células em uma planilha e copie as linhas para outra planilha

Eu tenho uma planilha chamada Backlog contendo linhas e colunas de dados. Preciso de um código que pesquise linha por linha na 2ª a última coluna procurando # N / A. Quando encontra # N / A, precisa verificar a última coluna se contém um C ou não. Se ele contiver um C, a linha inteira deverá ser anexada a uma planilha chamada Logoff. Se a última coluna não contiver um C, a linha inteira deverá ser anexada a uma planilha chamada Negado. A linha deve ser excluída da planilha Backlog original depois de movida para Logoff ou Negado. O código que tenho abaixo não está funcionando. Após a primeira instrução For, ela vai para End Sub, mas não há erros de compilação.

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

questionAnswers(1)

yourAnswerToTheQuestion