Condition sur 2 cellules

[ptitepo]

Bjr,
Je souhaite appliquer deux conditions sur deux celulles différentes, mais je n'arrive pas a adapté mon code.
Ma 1er condition est que la cellule en colonne B soit compris entre 90 et 99, et la 2iem c'est que la colonne D (de la même ligne donc) soit remplis.
Voici mon code, mais je n'arrive pas pour la 2iem conditions

For i = 1 To 17
ligne = Sheets(i).Range("A65536").End(xlUp).Row
For Each cell In Worksheets(i).Range("B2:B" & ligne)
        If cell > 90 And cell < 99 Then
            ligne1 = cell.Row
[COLOR="Red"]            If cell.Range("D" & ligne1) <> "" Then[/COLOR]
                     Instructions
            End If
        End If
    Next cell
Next i

 

[ptitepo]

Fonction somme

J'ai résolue