Bonjour,
A l'aide! J'ai une instruction en code :
ça marche sur mon poste habituel, mais sur un micro que je viens d'acquérir, ça marche pas (en fait, l'ordi n'arrive pas à détecter les fichiers dans le chemin d'accès spécifié)!!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 With Application.FileSearch .LookIn = "C:\monchemindacces" .Filename = "*.xls" If .Execute() > 0 Then MsgBox "" & .FoundFiles.Count & _ " fichier(s) trouvé(s)" For i = 1 To .FoundFiles.Count MsgBox .FoundFiles(i) Next i Else MsgBox "Les fichiers ne sont pas disponibles." Exit Sub End If End With
quand je lance la macro pas à pas, l'instruction ne semble pas reconnaitre le parametre .Execute()>0
les bibliothèques sont les memes en plus !! que faire ?
Merci d'avance pour votre aide si précieuse car la je suis bloqué dans mon projet !!
Partager