[Excel VBA] Problema con i For Each

[astimas]

Premettendo che di programmazione so molto poco, ho un problema nel gestire 4 cicli for each, cioè non so come metterli nell'ordine giusto per farli girare tutti

Ora sono così :

For Each CL In Worksheets("listino").Range("A3:A100").Value
For Each CL2 In Worksheets("statistica").Range("A3:A100").Value
For Each CL3 In Worksheets("listino").Range("B3:B100").Value
For Each CL4 In Worksheets("statistica").Range("B3:B100").Value

If CL3 = CL4 Then Worksheets("listino").Range("J3:j10").Value = "ok"
End If

Next
Next
Next
Next

Però così mi tiene fisso i primi 3 e mi cambiare continuamente SOLO CL4. Io invece voglio che si aggiornino tutti !!

Come posso fare !?!