Verifier un repertoire dans un espace Sharepoint, avec une macro Excel
Bonjour à tous,
J'ai déposé un ensemble de fichier Excel sur un espace sharepoint, et je souhaite pouvoir obtenir le même fonctionnement de mes macros sur ce site, que celui que j'avais en local.
Contexte : parcourir un répertoire et travailler sur les fichiers qu'il contient :
Cet extrait de code fonctionne en local, mais l'instruction Dir retourne une erreur sur le site sharepoint, car elle n'est pas en mesure de parcourir un chemin du style https:\\toto\titi
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
| gtChemin = ActiveWorkbook.Path
On Error GoTo ErrFct
gtRepDos = Dir(gtChemin & "\*.*", vbDirectory + vbHidden)
'*
While gtRepDos <> ""
gtRepDos = Dir()
gtRepDos = UCase(gtRepDos)
If gtRepDos = "Dossiers" Then
bRetour = True
GoTo FinFct
End If
Wend
ErrFct:
tMessage = "Pas d'accès possible au répertoire DOSSIERS dans le chemin " & gtChemin
iReponse = MsgBox(tMessage, vbOKOnly, tTitre) |
Quelqu'un a-t-il une idée ?
Par avance, merci.