Rechercher de ligne selon deux critères

Bonjour,

Je débute dans VBA, et après quelques heures de recherche je n'arrive pas à trouver la solution à mon problème.

J'ai une base de donnée qui ce remplie selon les information rentrées dans les différents UserForm crée.
L'un d'entre eux permet grâce à une "ComboBox1" de sélectioner une marque (ex : Ferrari, Peugeot, AUDI, ...) et grâce à une seconde "ComboBox2" qui elle me permet de sélectionner le type (ex: 1, 2, 3 ...).

J'ai en partie réussi grâce aux lignes de codes suivantes, à rechercher ce que je souhaite :

Dim Plage, Plage1 As Range
Dim Cel, Cel1 As Range
Dim ligne As Integer

If ComboBox1.Value = "" Then
MsgBox "Veuillez préciser le Modèle"
End If

If ComboBox2.Value = "" Then
MsgBox "Veuillez préciser le Type"
End If

<ital>If ComboBox1.Value <> "" And ComboBox2.Value <> "" Then

ligne = Sheets("donnée").Range("A" & 1).Value

Set Plage = Sheets("donnée").Range("D5:D" & ligne)

For Each Cel In Plage

If Cel.Value = UserForm3.ComboBox1.Value Then
Rows(Cel.Row).Hidden = False
Else
Rows(Cel.Row).Hidden = True
End If

Next

Set Plage1 = Sheets("donnée").Range("G5:G" & ligne)

For Each Cel1 In Plage1

If Cel1.Value = UserForm3.ComboBox2.Value Then
Rows(Cel1.Row).Hidden = False
Else
Rows(Cel1.Row).Hidden = True
End If

Next

Windows(1).WindowState = xlMaximized
Worksheets("donnée").Activate
ActiveSheet.PageSetup.Orientation = xlLandscape
UserForm3.Hide
Userform1.Hide

End If</ital>

Le problème est que si par exemple je demande a afficher le modèle ferrari et le type 2 de ce modèle, de par les lignes de code, le logiciel m'affiche tous les types 2 de tous les modèles !! et non uniquement le type 2 de ferrari.

Pouvez-vous m'aider, en espérant avoir étais assez clair, n'hesitez a demander plus de précision au cas ou.

Je remercie d'avance les personnes qui prendont le temps de lire ce message et surtout d'y répondre.

bonne fin de journée.

<config>Windows 7 / Internet Explorer 7.0</config>