Bonjour,

Je cherche a copier un fichier sur un serveur distant depuis mon application VBA.
J'ai commencé par essayer de copier un fichier d'un dossier à un autre mais cela ne fonctionne pas

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
 
vUrlDeux = ThisWorkbook.Path & "\Automation\CAL\"
 
 'appel de la fonction qui permet de créer un dossier a la date du jour et les fichiers .cal
            newFileInFolder vNomFichierDeux, vUrlDeux, 1
 
 
            'Ouverture du fichier
            Open vUrlDeux & "calendrier_recette_mens.cal" For Output As #1
            ' j'écris dans mon fichier vUrlMen
            Print #1, vDateMen
            'fermeture du fichier
            Close #1
 
Shell ("cp " & vUrlDeux & "calendrier_recette_mens.cal " & ThisWorkbook.Path)
J'aurais besoin d'une aide pour pouvoir avancer