FTP importer file

Bonjour,
je souhaite importer un fichier qui est sur un serveur unix avec une macro VBA.

j'ai fait la fonction suivante:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Sub Commande() Dim GetPath As String Dim strOpen As String   'hostname =VRLAXF 'Login = "wadmin" 'passeword = "wadmin" strQuote = Chr(34) strOpen = "open sftp://wadmin:wadmin@VRLAXF.com" GetPath = "get ""/home/wadmin/Export_File_dat.csv"" ""D:\TEAM\""" Call Shell("C:\ProgramData\WinSCP\winscp.com /command " & strQuote & strOpen & strQuote & GetPath & " " & strQuote & "exit" & strQuote, vbNormalNoFocus) End Sub

---

Quand j'exécute la macro j'ai un Ecran noir de winscp affichant :

Citation:

---

Recherche de l'hôte ...

---

puis il disparaît sans rien faire.

je fais ping VRLAXF depuis mon poste je trouve le serveur.

quelqu'un peut m'aider à récupérer mon fichier via une macro VBA.

merci

Salut, une recherche ?

Est-ce le fait que j'utilise un VPN cause un problème de connexion ?