Visual Basic 6 è il linguaggio di programmazione e ambiente di sviluppo integrato implementato da Microsoft. Il linguaggio è popolare per il suo sviluppo rapido di applicazioni e funzionalità di automazione. programmatori VB6 sono in grado di programmare e automatizzare una serie di programmi di Microsoft, tra cui Microsoft Office e, in particolare, Microsoft Excel. I programmatori sono in grado di fare riferimento a oggetti relativi alla Excel nel loro codice VB6, che permette loro di automatizzare, leggere e scrivere il programma. La scrittura di codice VB6 prende una certa conoscenza della sua sintassi di programmazione; una volta che la conoscenza è acquisita, scrivendo al Excel nel codice VB6 richiede solo pochi passi e linee di codice da seguire.

istruzione

1 Aprire Visual Basic 6 e selezionare "EXE standard" dal nuovo elenco di progetti.

2 Vai alla barra dei menu in alto, cliccare su "Progetto" e quindi fare clic su "Aggiungi modulo". In questo modo aggiungere un modulo di codice standard nel progetto VB6.

3 Digitare o copiare e incollare il seguente codice nel modulo, secondo Mike Rosenblum di Xtreme VB Talk.

Sub WriteToExcel ()

Dim oExcel As Excel.Application ' <-- *** Reference to Excel Application object***

Dim OWB Come Excel.Workbook '& lt; - *** riferimento all'oggetto cartella di lavoro Excel ***

OWS fiochi come Excel.Worksheet '& lt; - *** riferimento all'oggetto foglio di lavoro Excel ***

Set oExcel = nuovo Excel.Application

oExcel.Visible = True

Dim oRng1 Come Excel.Range

Dim oRng2 Come Excel.Range

Set OWB = oExcel.Workbooks.Add

Set OWS = oWB.Worksheets ( "Sheet1")

Set oRng1 = oWS.Range ( "A1")

Set oRng2 = oWS.Range ( "B2: E5")

oRng1.Value = "Ciao Mondo"

Chiamare oRng1.Copy (Destinazione: = oRng2)

oWB.SaveAs ( "Ciao World.xls") '& lt; - risultati salvati qui.

Pulire:

Set oWS = Nothing

Se non OWB è niente allora oWB.Close

Set OWB = Nothing

oExcel.Quit

Set oExcel = Nothing

End Sub

Il codice fa riferimento a oggetti di Microsoft Excel e quindi utilizza tale connessione per aprire Microsoft Excel, quindi scrivere la parola "Ciao Mondo" nella cella A1 e serie B2: E5. Poi salva il documento come "Ciao World.xls" sul computer e procede a chiudere Microsoft Excel.

4 Premere il tasto "F5" per eseguire il programma.