Bonjour à tous

Mon problème du jour !

Je n'arrive pas à utiliser la bonne syntaxe pour l'utilisation de la fonction VLookup dans un Useform qui est externe au fichier excel.

C'est à dire que Mon UF fait appel à un fichier excel (ici: ClasseurTest.xls) qui n'est pas ouvert.

Pour info voici les lignes de code qui ne fonctionnent pas

Si qqun pouvait m'aider

Merci à vous.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
    Private Sub ListBoxCommune_Click()
 
      Dim Cheminxl As String
 
        Cheminxl = "c:\ClasseurTest.xls"
 
 
        Me.TextBoxLundi = Cheminxl.WorksheetFunction.VLookup(Me.ListBoxLundi, Range("C9:G332"), 2)
        Me.TextBoxMardi = Cheminxl.WorksheetFunction.VLookup(Me.ListBoxMardi, Range("C9:G332"), 3)
        Me.TextBoxMercredi = Cheminxl.WorksheetFunction.VLookup(Me.ListBoxMercredi, Range("C9:G332"), 4)
        Me.TextBoxJeudi = Cheminxl.WorksheetFunction.VLookup(Me.ListBoxJeudi, Range("C9:G332"), 5)
    End Sub