Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Tester si un fichier est ouvert dans OneDrive

  • Initiateur de la discussion Initiateur de la discussion ThierryP
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

ThierryP

XLDnaute Occasionnel
Bonjour le forum,

Avec des fichiers stockés en local, j'utilisais cette fonction pour vérifier si un fichier était ouvert :
VB:
Function Verif_Fichier_Ouvert(ByVal Fichier As String) As Boolean
Dim Filenum As Integer

Filenum = FreeFile()
On Error Resume Next
Open Fichier For Input As #Filenum
Close Filenum
On Error GoTo 0
Select Case Err
    Case Is = 0
        Verif_Fichier_Ouvert = False
    Case Is = 52, 53, 70
       Verif_Fichier_Ouvert = True
End Select
End Function
J'ai basculé ces fichiers dans OneDrive mais maintenant la fonction ne fonctionne plus ! J'ai une erreur "Nom ou numéro de fichier incorrect" quand je tente Open Fichier for input
J'ai bien vérifié que dans le path du fichier on a des "/" et pas des "\" comme en local, mais ça plante encore...

Je suis preneur de toute piste pour solutionner mon souci !
D'avance merci à tou(te)s !
 
Bonsoir ThierryP

Le dossier OneDrive est-il partagé ou pas !?
Sinon, il suffit (normalement) d'utiliser le chemin local

A+
 
Dernière édition:
Bonsoir wDog66,

Merci pour ton retour rapide !
Alors, non il n'est pas partagé, je suis le seul utilisateur.
Il va me falloir beaucoup de Doliprane je pense.... La fonction "Standalone" compte un peu plus de 1000 lignes de code ..... Et je ne suis pas sûr d'avoir les capacités de comprendre ce code !
Je crois que je vais rapatrier les fichiers en local et faire une sauvegarde régulière dans onedrive pour rester simple !

Merci en tous cas d'avoir pris le temps de faire cette recherche !!
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
2
Affichages
432
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…