Probleme rechercheV

Fermé
tweek - 2 sept. 2013 à 18:15
f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 - 4 sept. 2013 à 16:09
bonjour je souhaiterai effectué une rechercheV pour une création de formulaire a l'aide d'une inputbox

je pense que mon probleme vient du fait que je n'ai pas défini a quel colonne correspond mon inputbox

Sub recherchev()
Dim resultat As String


resultat = inputbox("Veuillez insérer la référencepour envoyer le mail ", "Référence", "")
value1 = Application.WorksheetFunction.VLookup(resultat, (pt_table), 2, 0)
Value2 = CDate(Application.WorksheetFunction.VLookup(resultat, (pt_table), 3, 0))
value3 = CDate(Application.WorksheetFunction.VLookup(resultat, (pt_table), 5, 0))

MsgBox "check " & value1 & ", is " & Value2 & " is " & value3 & "."


End Sub

merci d'avance

1 réponse

f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 710
2 sept. 2013 à 18:51
Bonjour,

Si pt_table est un nom de plage:

Sub recherchev()
    Dim resultat As String
    resultat = InputBox("Veuillez insérer la référence pour envoyer le mail ", "Référence", "")

    Value1 = Application.WorksheetFunction.VLookup(resultat, Range("pt_table"), 2, 0)
    Value2 = CDate(Application.WorksheetFunction.VLookup(resultat, Range("pt_table"), 3, 0))
    value3 = CDate(Application.WorksheetFunction.VLookup(resultat, Range("pt_table"), 5, 0))

    MsgBox "check " & Value1 & ", is " & Value2 & " is " & value3 & "."

End Sub
0
merci de ta réponse malheureusement un message d'erreur s'affiche a chaque fois apres la saisie dans l'inputbox runtime error "1004" unable to get the vlookup property of the worksheet fonction class
0
f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 710
3 sept. 2013 à 07:44
Bonjour,

pt_table est-ce un nom de plage de cellules ou ...... ???????

A+
0
oui excuse moi de ne pas l'avoir précisé pt_table est un nom de plage de cellule allant de I2 a O1600
0
f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 710
4 sept. 2013 à 16:09
Bonjour,

Cela veut dire que ce que vous cherchez n'existe pas dans la premiere colonne de la plage (reference), c'est peut-etre un probleme de format. Quand vous avez l'erreur, click sur debugage et placez le curseur souris sur resultat pour voir si le format est celui de la premiere colonne de la plage.

Un inputbox, par defaut, revoit une chaine de caractere(s)

A+
0