Estoy tratando de crear un código VBA para descargar un archivo a una ruta específica desde un enlace FTP directo (preferido asincrónicamente). Solo encontré código para hacerlo funcionar con URL URL, pero para FTP obtengo este error:

"Error en tiempo de ejecución '-2146697210 (800c0006)': el sistema no puede localizar el objeto especificado"

Para estas primeras pruebas no se ha configurado el nombre de usuario o la contraseña para el servidor ftp.

Mi código que funciona solo para http está a continuación:

Sub DownloadFile()

Dim myURL As String
myURL = "ftp://xxx.xxx.xxx.xxx/test.txt"

Dim WinHttpReq As Object
Set WinHttpReq = CreateObject("Microsoft.XMLHTTP")
WinHttpReq.Open "GET", myURL, False, "username", "password"
WinHttpReq.send

myURL = WinHttpReq.responseBody
If WinHttpReq.Status = 200 Then
    Set oStream = CreateObject("ADODB.Stream")
    oStream.Open
    oStream.Type = 1
    oStream.Write WinHttpReq.responseBody
    oStream.SaveToFile "C:\FTP\file.txt", 2 ' 1 = no overwrite, 2 = overwrite
    oStream.Close
End If

End Sub