Trouver valeur selon 2 critères sur une même ligne

Bonjours à tous, je suis débutant en VBA, je cheche à modifier ma macre de recherche d'une valeur avec 2 critères. La valeur chercher est le numéro de JOB ce trouvant sur la feuille1(06-10) en C, les 2 critères sont sur la feuille2(Donnée), c'est la colonne A qui est la JOB de la feuille1 et doit corespondre en F avec opération 100 seulement, car il y a pluseiurs opérations pour une même JOB, je veux seulement les donnée avec les opérations 100, merci et bonne soirée. André.

Voici mon fichier:

Voici ma macro:

Option Explicit

Public TOTJOB As Integer ' (LONG)

Public I, I1, J, J1 As Long

Public JOB As String

Public JOB1 As Range

Sub RECH()

TOTJOB = Feuil1.Range("C7").End(xlDown).Row

For I = 7 To TOTJOB

JOB = Feuil1.Cells(I, 3)

Set JOB1 = Feuil2.Range("A:A").Find(JOB, , , xlWhole)

If JOB1 Is Nothing = False Then

I1 = JOB1.Row

Feuil1.Cells(I, 1) = Feuil2.Cells(I1, 8)

Feuil1.Cells(I, 2) = Feuil2.Cells(I1, 4)

Feuil1.Cells(I, 4) = Feuil2.Cells(I1, 2)

Feuil1.Cells(I, 5) = Feuil2.Cells(I1, 3)

Else

End If

Next

End Sub

Bonjour,

Une solution

A+

Merci beaucoup sa fontionne, bonne soirée.

André.