Deux condition sous VBA

[Gousnef]

Bonjoue a tous et bon week end !!
je realise un code VBA :
Et je souhaiterais trié un tableau excel selon deux variables contenu dans deux colonnes differentes, je pensais utiliser le systeme "AND" ( je c'est pas si le mot systeme est approprié), mais je ne comprend pas, mon code ne fonctionne !!

NbreCase1 = Range("A2").End(xlDown).Row (est le nombre maximal de ligne sur ma feuille)


For Each d In Range(Cells(2, 86), Cells(NbreCase1, 86))
For Each c In Range(Cells(2, 9), Cells(NbreCase1, 9))

If c.Value = "ANA" And d.Value = "O" Then

Workbooks("ICD_Avionique_COM").Worksheets("ANA sortie").Cells(l, i).Value = Cells(c.Row, i).Value

ElseIf c.Value = "ANA" And d.Value = "I" Then
For i = 1 To 150
Workbooks("ICD_Avionique_COM").Worksheets("ANA entrée").Cells(l, i).Value = Cells(c.Row, i).Value
Next i
n = n + 1
End If
Next c
Next d

Voila si quelqu'un pourrais m'eclairé !!
Merci