VBA fileSearch: URL dans le champ lookin ?

Elephanfaron

XLDnaute Nouveau
Bonjour XLD,

Je suis en train d'ecrire une macro qui va chercher des donnees dans des fichiers Excel. Ces fichiers se trouvent sur un Sharepoint (accessible via une URL). J'arrive a acceder a un fichier si je donne a VBA directement son chemin:
Code:
Set oXL = CreateObject("Excel.application")
cheminFichier="https.//****.****.com/***/***/monFichier.xls"
Set monClasseur = oXL.Workbooks.Open(cheminFichier))
'reste du code

Je souhaite cependant lire seulement lire certains fichiers, et je fais donc une recherche dans le Sharepoint des fichiers qui m'interessent. La ca ne marche plus, il semble que le fait de mettre une URL dans le champ "lookin" de Filesearch ne fonctionne pas... Voila donc ma question: Existe-t-il quand meme une solution, pour faire une recherche au sein de mon sharepoint ? Un petit apercu du code:
Code:
Dim oFS As Office.FileSearch
Set oFS = Application.FileSearch
    
With oFS
        .NewSearch
        .FileType = msoFileTypeExcelWorkbooks
        .fileName = "Cockpit.xls"
        .LookIn = "https://***.***.com/****/***/***/***"
        .SearchSubFolders = True
        
        .Execute
        MsgBox .FoundFiles.Count
End with

Et la msg box me sort 0, alors que je sais que le fichier se trouve dans le repertoire...
Merci d'avance pour votre aide !
 

Discussions similaires

Statistiques des forums

Discussions
312 214
Messages
2 086 311
Membres
103 175
dernier inscrit
abcc