Microsoft Excel è un foglio di calcolo che permette di creare fogli di calcolo per organizzare e calcolare i dati e grafici. Visual Basic 6 (VB6) è una versione di Visual Basic, che è il linguaggio di programmazione e ambiente di sviluppo integrato creato da Microsoft. La creazione di informazioni in Excel è più facile che in VB6, quindi a volte è pratico per importare dati da Excel a VB6. Ci sono diversi modi per farlo, ma il più semplice è una riga di codice in Visual Basic che automatizza il processo.

istruzione

1 Avviare un nuovo progetto di Visual Basic.

2 Aggiungere una casella di riepilogo e il pulsante di comando alla maschera.

3 Selezionare "Menu Progetto" e quindi selezionare l'opzione "Riferimenti". Da lì, prendere la linea "Microsoft Excel Library".

4 Inserire nel codice seguente.

Private Sub Command1_Click ()

Dim objXLApp As Excel.Application

Dim intLoopCounter As Integer

Set objXLApp = nuovo Excel.Application

con objXLApp

.Workbooks.Open "C: \ file.xls"

.Workbooks (1) .Worksheets (1) .Select

Per intLoopCounter = 1 Per CInt (.ActiveSheet.Cells.SpecialCells (xlCellTypeLastCell) .Row)

List1.AddItem .Range ( "A" & intLoopCounter)

Successivo intLoopCounter

.Workbooks (1) .close False

.Smettere

End With

Set objXLApp = Nothing

End Sub

5 Cambiare la "C: \ file.xls" per il nome del file di Excel. Questo sarà ora importare i dati dal foglio di calcolo Excel.