Discussion :

[MatMeuh]

j'ai cette petite fonction qui ne fonctionne pas !!!!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Function Niveau(IRN, plage) As String
    Dim temp As String
    temp = Application.WorksheetFunction.VLookup(IRN, plage, 8, False)
    Niveau = temp
End Function

en effet j'essaie de renvoyer le contenu de la colonne 8 de ma "plage"

Si je fais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox Application.WorksheetFunction.VLookup(IRN, plage, 8, False)

Je recois bien ce que je veux... mais j'arrive pas à le mettre en param de sortie de ma fonction

merci !!!

[SfJ5Rpw8]

? j'ai essayé ta fonction ... et elle marche ..?

? tu l'appelle comment ?

[MatMeuh]

en fait elle plante quand il ne trouve pas la donnée en question !!!

l'équivalent d'un #N/A

il faut donc faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
 
Function Niveau(IRN, plage) As String
    Dim RechercheV As Variant
    On Error GoTo Fin
        RechercheV = Application.WorksheetFunction.VLookup(IRN, plage, 8, False)
        Niveau = RechercheV
    Exit Function
Fin:
    Niveau = ""
End Function