Application.WorksheetFunction.VLookup

UTratturi

XLDnaute Nouveau
Bonjour tout le monde,

Voici mon problème, je souhaite utiliser deux fois Application.WorksheetFunction.VLookup ( ) [ rechercheV en VB ]

Voici mon code

Private Sub cmdbtnrech2_Click()
Dim val1 As String
Dim val2 As String


With Me.programme
.MultiLine = True
.Value = Application.WorksheetFunction.VLookup(Me.ComboBox1, Range("G2:T200"), 14)
End With

With Me.objectif
.MultiLine = True
.Value = Application.WorksheetFunction.VLookup(Me.ComboBox1, Range("G2:T200"), 5)
End With

With Me.responsable
.MultiLine = True
val1 = Application.WorksheetFunction.VLookup(Me.ComboBox1, Range("G2:Z200"), 3)

val2 = Application.WorksheetFunction.VLookup(Me.ComboBox1, Range("G2:Z200"), 18)
.Value = val1 & Chr(13) & val2
End With

tout se passe bien pour les trois premières fois ou je l'utilise, mais pour la quatrième j'ai le message d'erreur suivant : Erreur d'exécution 1004 : Impossible de lire la propriété VLookup de la classe WorsheetFunction .

est - il possible d'utiliser deux fois cette formule d'affilé ? l'idée pour moi étant de concaténer le résultat de deux recherches.

J'arrive pas à trouver de solution,

si quelqu'un peut m'aider

merci bien !


EDIT : Erreur dans la plage de recherche - Réponse trouvée
 
Dernière édition:

fhoest

XLDnaute Accro
Re : Application.WorksheetFunction.VLookup

Bonjour ,

sans doute que la valeur n'existe pas donc avant la ligne de code:
Code:
On Error Resume Next
A+
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas