Microsoft Excel er et regnearksprogram, der giver dig mulighed for at oprette regneark til at organisere og beregne data og grafer . Visual Basic 6 ( VB6 ) er en version af Visual Basic, som er det programmeringssprog og integreret udviklingsmiljø skabt af Microsoft . Oprettelse information i Excel er nemmere end i VB6 , så det er nogle gange praktisk at importere data fra Excel til VB6 . Der er flere måder at gøre dette, men det enkleste er en linje kode i Visual Basic , der automatiserer processen. Instruktioner
1
Start et nyt Visual Basic -projekt.
2
Tilføj en listbox og kommandoknap til formularen .
3 < p > Vælg "Projekt Menu" og vælg derefter "Referencer" valgmulighed. Derfra vælge "Microsoft Excel Library" linje.
4
Indtast i følgende kode .
Private Sub Command1_Click ()
Dim objXLApp Som Excel. ansøgning
Dim intLoopCounter As Integer
Set objXLApp = Ny Excel.Application
objXLApp
Workbooks.Open . "C: \\ File.xls " Salg
. projektmapper (1). regneark (1). Vælg
intLoopCounter = 1 Til Cint ( . ActiveSheet.Cells.SpecialCells ( xlCellTypeLastCell ) . Row )
List1 . AddItem . Range (" A " & intLoopCounter )
Næste intLoopCounter
. projektmapper (1). Luk False
. Afslut
End With < br >
Set objXLApp = Nothing
End Sub
5
Change "C : \\ File.xls " til din Excel-fil navn. Dette vil nu importere data fra Excel-regnearket .