I'm getting the error '13' Incompatible types, in the line of the first If:
Count = 0
For x = 1 To LastRow Step 1
If Cells(x, 8).Value = "Materiais" Or Cells(x, 8).Value = "Imobilizado" Then
If Cells(x, 11).Value = "NÃO CATALOGO" Then
Count = Count + 1
End If
End If
Next x
Would anyone know where the problem is?