Incompatiblité de type avec If

Bonjour,


Je n'arrive pas à afficher un MsgBox après un If sur la valeur d'une variable
voici mon code :

Dim var As String
var = WorksheetFunction.VLookup(Sheets("Feuil1").Range("A" & i), Sheets("Feuil3").Range("A:B"), 2, False)

If (var) Is Nothing Then

MsgBox ("valeur introuvable")



il ya des boucles FOR j'ai copié la partie qui bug seulement

Votre aide svp :(