File Transfer Protocol è una tecnologia utilizzata per trasferire file tra computer su Internet. VBA è un linguaggio di programmazione sviluppato da Microsoft. VBA è basato sulla Component Object Model di Microsoft, che gli permette di riferimento oggetti e fare uso delle loro proprietà e metodi per creare programmi. Uno di questi oggetti è possibile fare riferimento in VBA è l'Internet Transfer oggetto di controllo di Microsoft. Questo oggetto gestisce i trasferimenti di file su piattaforme Windows. Utilizzando l'oggetto di controllo Microsoft Internet Transfer, i programmatori possono creare e utilizzare FTP nei loro programmi. Acquisire l'oggetto di controllo Internet Transfer Microsoft per utilizzare i servizi di FTP è semplice per un programmatore alle prime armi VBA e richiede solo pochi passi.

istruzione

1 Aprire Microsoft Excel.

2 Fai clic su "Strumenti", "Macro" e poi "Visual Basic". Si aprirà l'ambiente di programmazione VBA.

3 Fai clic su "Strumenti" e "di riferimento". Scorrere verso il basso e selezionare "Microsoft Internet Transfer Control" e fare clic su "OK".

4 Fai clic su "Inserisci" e "Modulo". Si è ora in un modulo di codice di programmazione.

Digitare o copiare e incollare il seguente nel modulo di codice:

Funzione UploadFile (ByVal HostName come stringa, _

ByVal UserName As String, _

ByVal password come stringa, _

ByVal NomeFileLocale As String, _

ByVal RemoteFileName come stringa) come booleano

Dim FTP Come Inet

Set FTP = Nuovo Inet

con FTP

.Protocol = IcFTP

.RemoteHost = HostName

.UserName = NomeUtente

.Password = Password

.Execute .URL, "Put" + NomeFileLocale + "" + RemoteFileName

Do While .StillExecuting

DoEvents

Ciclo continuo

UploadFile = (.ResponseCode = 0)

End With

Set FTP = Nothing

End Function