Bonjour le forum,

Je suis désolé de vous embêter avec mon problème qui me paraît assez bête mais cela fait une journée que je cherche à le résoudre sans succès.

Je souhaiterais copier un fichier qui se trouve sur le réseau de mon entreprise pour les placer sur mon disque local. J'utilise le code suivant:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
Dim objaFSO
Set objaFSO = CreateObject ("Scripting.FileSystemObject")
If objaFSO.FileExists("W:\Outils\data\modèles\Word\proplongfrancais.dot") Then
	objaFSO.CopyFile "W:\Outils\data\modèles\Word\proplongfrancais.dot", "C:\Program Files\Microsoft Office\modèles\Word\", True
	Set objaFSO = Nothing
Le code s'execute sans erreur mais la copie ne s'effectue pas. J'ai lu sur un forum que l'objet FileSystemObject ne gère que les fichiers en local mais je n'ai pas réussi à trouver de solution pour copier un fichier depuis un disque réseau vers un disque local.

Pourriez-vous m'aider svp ?

Guiz721