Microsoft 365 [VBA] Ouvrir un emplacement Sharepoint pour selection manuel d'un fichier

[Fredox]

Bonjour à tous,

Je cherche à remplacer le code ci-dessous qui permet d'ouvrir une boite de dialogue pour ensuite sélectionner le fichier cible

' >>----------| Ouverture de la boite de dialogue pour sélection du fichier à importer ----------------------------------------------|
Cible = Application.GetOpenFilename("Fichiers Excel ,*.xlsx", , "Sélectionnez votre fichier à importer")
If Cible = "Faux" Then GoTo Fin

J'aimerais faire de même, mais accéder directement à un dossier sur SharePoint

https://infosites/sites/intranet/france

Je ne veux pas qu'il s'ouvre tout de suite, je veux juste mémoriser l'emplacement et la cible

Une petite idée ??
Merci