Protocolo de transferencia de archivos es una tecnología que se utiliza para transferir archivos entre ordenadores a través de Internet. VBA es un lenguaje de programación desarrollado por Microsoft . VBA se basa en el modelo de objetos componentes de Microsoft , que le permite hacer referencia a objetos y hacer uso de sus propiedades y métodos para crear programas . Uno de estos objetos puede hacer referencia en VBA es el objeto de control de Microsoft Internet Transfer. Este objeto se encarga de la transferencia de archivos en plataformas Windows. Con el objeto de control de Microsoft Internet Transfer , los programadores pueden crear y usar FTP dentro de sus programas. La adquisición del objeto de control de Microsoft Internet Transfer de usar los servicios de FTP es simple para un principiante VBA programador y toma sólo unos pocos pasos. Instrucciones
1

Abrir Excel.

2 Haga clic en " Herramientas " de Microsoft "Macro " y luego en "Visual Basic " . Esto abrirá el entorno de programación VBA.
3

Haga clic en " Herramientas" y "Referencia ". Desplácese hacia abajo y seleccione la opción " Internet Transfer Control Microsoft " y haga clic en " Aceptar".

4 Haga clic en " Insertar" y " módulos". Ahora se encuentra en un módulo de código de programación

Escriba o copie y pegue el siguiente código en el módulo : .

Función UploadFile ( HostName ByVal As String , _ ByVal

Nombre de usuario As String , _ ByVal

Contraseña As String , _

LocalFilename ByVal As String , _

RemoteFileName ByVal As String ) As Boolean Dim

FTP Como inet

Configurar FTP = inet Nueva

FTP

. Protocolo = icFTP

. RemoteHost = HostName

. username = Nombre de usuario

. Password = Contraseña

. Ejecutar. URL , " Put " LocalFilename + + " " + RemoteFileName

Do While. StillExecuting

DoEvents < br >

Loop

UploadFile = ( . ResponseCode = 0 )

extremo con

Configurar FTP = Nothing

Función End of < br >