Bonjour,

Je n'arrive pas à utiliser la fonction is error relative à la fonction VLOOKUP. un message d'erreur s'affiche toujours:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Private Sub CommandButton19_Click()
 
Dim x As Variant
   x = Application.WorksheetFunction.VLookup(CDbl(TextBox31), Sheets("Feuil2").Range("Tablo"), 3, False)
   If IsError(x) Then
      Exit Sub
   Else
      TextBox32 = x
 
End Sub
Merci pour votre aide