VBA - fonction VLookup

Question

Bonjour !
J'ai un problème avec le code ci-dessous, où la fonction VLookup ne trouve pas une valeur qui se trouve pourtant dans mon tableau.
Voici le code :

Dim RFF As String
    Dim NomComplet As String
    Dim TableauHisto As ListObject
    Set TableauHisto = Sheets("Historique des mouvements").ListObjects("TableauHisto")
    Dim TableauRFF As ListObject
    Set TableauRFF = Sheets("        Aperçu des coûts       ").ListObjects("TableauRFF")

   With TableauRFF.Sort
        .SortFields.Clear
        .SortFields.Add Key:=TableauRFF.ListColumns(2).DataBodyRange.Cells(1, 1)
        .Header = xlYes
        .Apply
    End With

    RFF = Sheets("          Saisie RFF          ").Range("F8").Value
    NomComplet = Application.WorksheetFunction.VLookup(RFF, TableauRFF, 1, False)
    MsgBox (RFF & " est le trigramme de : " & NomComplet)

    End Sub

J'obtiens une erreur 1004 : impossible de lire la propriété VLookup de la classe WorksheetFunction

Je suis absolument certain que la variable RFF est correcte, et que son équivalent est bien présent dans le tableau TableauRFF. Auriez-vous une solution ? ChatGPT n'a réussi qu'à me faire faire n'importe quoi !

Merci d'avance !

Très belle soirée à vous,

Eldervand

fanfan38 · Answer

Un fichier est TOUJOURS le bienvenu Essai ça au lieu du vlookup position=Application.Match(RFF, Range(TableauRFF).Columns(1), False) A+ François...