#N/A et vlookup e VBA

[PATDRO]

Bonjour,

J'utilise la fonction vlookup pour effectuer une xtraction ds une base de donénes excel, cela fonction bien mais lorsque qu'il n'y a pas de valeur trouvée cela me retourne #N/A je voudrais ne rien afficher,comment procéder?
( je connaissais le ESTNA en RECHERCHEV sous excel )
Ci-dessous ma page vba

Sub Affect_email()

' declaration de variables

Dim mCell As Range ' Pour parcourir toutes les cellules sur la plage de selection



'Ajustement automatique des largeures de colonnes et mise en gras de la première ligne

ActiveWorkbook.Sheets("Echeances_contrats").Select
Columns("A:N").Select
Range("A1").EntireRow.Select
Selection.Font.Bold = True
Selection.EntireColumn.AutoFit

'Recherche adresse mail dans base mail_cli et affichage en colonne O

Range("I1").Select
Range(ActiveCell, ActiveCell.End(xlDown)).Select
ActiveWorkbook.Names.Add Name:="nocli", RefersToR1C1:=Selection 'nomme la zone selectionnée en dynamique

For Each mCell In Selection

With Sheets("Echeances_contrats")
.Columns("O").Value = WorksheetFunction.VLookup(.Range("nocli").Value, Sheets("Mail_cli").Range("MAILCLI"), 4, False)


End With

Next

' Ecriture entete colonne O

Range("O1").Select
ActiveCell.Formula = "Adresse_mail"
Selection.EntireColumn.AutoFit


End Sub