Fonction Si avec Recherchv en VBA

Bonjour à tous

je n'arrive à associer ma recherchv ci dessous à if pourtant toute seul elle fonctionne bien.

With Cells(ligne, 14)
.Formula = "=IFERROR(VLOOKUP(RC[-7],'[MAT088 TOUT.xls]Sheet1'!R1C1:R600C16,15,FALSE),"""")"
.Value = .Value

elle consiste à tester une valeur dans le fichier Mat088-tout-test. si le résultat renvoie 0 j'applique la condition j'ai essayé d'écrire ça:

IF Application.WorksheetFunction.VLOOKUP(RC[-7],'[MAT088 TOUT.xls]Sheet1'!R1C1:R600C16,15,FALSE)="0" then.

j'ai erreur de compilation.

si joint les 2 fichiers que j'ai réduit au strict minimum

merci de votre aide par avance

Philippe

Bonjour,

Teste cette macro

Sub test()
  Dim ligne As Long
  Dim objPlageRecherche As Range

  Set objPlageRecherche = Workbooks("mat088-tout-test.xlsx").Worksheets("Feuil1").Range("a1:q600")
  ligne = 2

    Do While Cells(ligne, 1).Value <> ""
      If Application.WorksheetFunction.VLookup(Cells(ligne, 7), objPlageRecherche, 15, False) = "" Then
        Cells(ligne, 14).Value = "?"
      End If
    ligne = ligne + 1
    Loop
End Sub