Code to count under certain condition

Hi everyone,
Could someone identify what´s wrong with my code below?
I want it to count under a certain condition and then store the total number in a variable, but I´m getting a "0" answer. The code is like follows:

Sub ContaSEespecial()
Dim i As Integer
Dim j As Integer
Sheets("Geral").Activate
For i = 201 To i = 210 Step 1
If (Cells(i, 42).Value and Cells(i, 43).Value and Cells(i, 44).Value) > 10 Then
j = j + 1
End If
Next i
MsgBox (j)
End Sub

Tnx!