Discussion :

[llebras89]

Bonsoir,

J'essaie de faire un code qui se connecte à des fichiers sur Sharepoint et je n'arrive pas à voir pourquoi de temps à autre ma macro me retourne une erreur 52

Voila le code (Rep et Rep1 sont déclarés en string et le replace est juste pour mettre les / en \ et faire que le Dir marche.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Rep = "https://technip.sharepoint.com/sites/LoadingSystems-Projectmanagement/Shared Documents/Monthly project review sheets/"
Rep1 = Rep
Rep = Replace(Replace(Rep, "https:", ""), "/", "\")
Rep = Replace(Rep, Split(Rep, "\")(2), Split(Rep, "\")(2) & "@SSL")
i = 0
 
Fichier = Dir(Rep, vbDirectory)

Tout d'abord j'ai pensé que c'était un problème d'accès et que je devais activer mon compte microsoft office 365, mais malgré cela le problème revient de temps à autre sans que je puisse identifier ce qui fait planter la recherche Dir, quelqu'un aurait il une solution??

Merci par avance.

Loïc.

[Thumb down]

Bonjour,
https://support.microsoft.com/fr-fr/...1-e8bc2e4c3aab

[llebras89]

Merci, je vais voir avec l'admin qui gère le sharepoint sur lequel je travaille.