Bonjour,
Je n'arrive pas à utiliser la fonction is error relative à la fonction VLOOKUP. un message d'erreur s'affiche toujours:
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.
Je n'arrive pas à utiliser la fonction is error relative à la fonction VLOOKUP. un message d'erreur s'affiche toujours:
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.