Bonjour,
Pourriez vous m'aider, j'essaie d'utiliser la fonction personnalisée "existeFichier" et pour laquelle, je vous remercie et qui fonctionne parfaitement jusqu'à je partage le fichier.
Je m'explique, quand j'ouvre en premier, le fichier partagé avec cette fonction personnalisée, les cellules qui utilisent cette fonction, donnent les résultats sans aucun problème mais si un deuxième utilisateur ouvre ce fichier partagé, alors une erreur automation s'affiche et il en est de même pour tous ceux qui veulent ouvrir ce fichier partagé.
Il est alors impossible de débugger car l'application excel est plantée et il me faut utiliser le gestionnaire de tâches pour arrêter l'application excel des utilisateurs en question.
En supprimant cette fonction personnalisée "existeFichier" dans le module 1 de mon fichier partagé, alors aucun problème avec ce fichier partagé qui possèdent d'autres macros.
D'autre part, si je retire le partage du fichier avec cette fonction personnalisée, alors, aucun problème, même pour ceux qui ouvrent le fichier en lecture seule.
Pouvez vous m'aider à résoudre ce problème ?
sachant que je souhaiterai dans la mesure du possible, ne pas avoir à enregistrer cette fonction personnalisée dans un fichier .xla ou .xlam.
Je vous remercie par avance.
Ci-dessous la fonction en question de votre proposition:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Function existeFichier(fichier, Optional répertoire) Application.Volatile If IsMissing(répertoire) Then répertoire = ThisWorkbook.Path temp = Dir(répertoire & "\" & fichier) existeFichier = (temp <> "") End Function
Partager