Si usaras el boton BUSCAR verias que el tema se trato muchas veces ya
Igual tenia esto a mano asi que te lo posteo, tenes qeu agregar el control inet
Inet1.URL = "ftp://ftp.servidorftp.com.ar"
Inet1.UserName = "usuario"
Inet1.Password = "pass"
Inet1.Execute , "GET " & "archivoabajar.xxx"
Saludos