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
Partager