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 l'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 consente di automatizzare il processo . Istruzioni
1
Avviare un nuovo progetto di Visual Basic .
2
Aggiungi una casella di riepilogo e il pulsante di comando alla maschera .
3 < p > 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 come Excel . applicazione
Dim intLoopCounter As Integer
objXLApp = New Excel.Application
objXLApp
Workbooks.Open . "C : \\ File.xls "
. Cartelle di lavoro (1). fogli di lavoro (1). Seleziona
intLoopCounter = 1 To CInt ( . ActiveSheet.Cells.SpecialCells ( xlCellTypeLastCell ) . Row ) per
List1 . . Campo AddItem ( " A" & intLoopCounter ) per
Successivo intLoopCounter
. Cartelle di lavoro ( 1) . Chiudi False
. Quit
End With < br
Set> objXLApp = Nothing End Sub
5
Cambia il "C : \\ File.xls " per il nome del file di Excel . Questo sarà ora importare i dati dal foglio di calcolo Excel .