Fichier Historique

[Seb67210]

Bonjour à toutes et à tous !

J'ai une petite question pour vous...

Dans le cadre de mon travail j'ai crée un fichier espion enregistrant l'acces ( ouverture / Fermeture ) d'un fichier.

Code :
Set Wb = Workbooks.Open(Filename:="W:\Automatisme\Gif Glossaire\LogSuivi.xls")

Le soucis que je rencontre, c'est que toute les personnes sur le réseau n'ont pas forcément le bon lecteur réseau de paramétré sur leur PC ( Lettre W ).
Le fichier espion devient donc impossible à atteindre et le fichier excel lance le déboggeur...

Comment faire un test du style , si mon fichier espion n'est pas accessible shunter cet enregistrement ?

J'espère avoir bien expliqué mon soucis.

Merci d'avance pour vos réponses.

 

[Efgé]

Re : Fichier Historique

Bonjour Seb67210,
Je pense qu'en utilisant le chemin complet depuis le serveur (\\Toto\1erNiveau\2emniveau\etc...) le problème de "raccourci réseau" disparaitra.
Cordialement

 

[Odesta]

Re : Fichier Historique

Bonjour
Voici le test pour vérifier de la présence d'un dossier (et donc de son accessibilité en lecture au moins)

Set fso = CreateObject("Scripting.FileSystemObject")
testDossier = fso.FolderExists(chemin_du_dossier_à_tester)

Cordialement

Olivier

EDIT : bonjour Efgé, désolé du téléscopage. La solution du chemin complet est la meilleure !

 

[Seb67210]

Re : Fichier Historique

Bonjour Efgé,

Je viens de faire la modification merci pour l'idée...
Tellement habitué de bosser "en local" !

Je te tiendrai au courant mais je pense que tu as trouvé la bonne idée

THANKS à toi !!!