hur du importerar Excel-data i Visual Basic 6

Microsoft Excel är ett kalkylprogram som låter dig skapa kalkylblad för att organisera och beräkna data och diagram . Visual Basic 6 ( VB6 ) är en version av Visual Basic , som är det programmeringsspråk och integrerade utvecklingsmiljö som skapats av Microsoft . Skapa information i Excel är enklare än i VB6 , så är det ibland praktiskt att importera data från Excel till VB6 . Det finns flera sätt att göra detta , men det enklaste är en rad kod i Visual Basic som automatiserar processen
1 .
Starta ett nytt Visual Basic -projekt.
2 .
Tillsätt en listbox och kommandoknapp i formuläret .

3 .
Välj ” Project Meny ”och välj sedan ”Referenser ” alternativet . Därifrån , välj ”Microsoft Excel Library ” linje .
4 .
Skriv in följande kod .

Private Sub Command1_Click ( )

Dim objXLApp Som Excel. Application

Dim intLoopCounter As Integer

Set objXLApp=Nya Excel . Tillämpning

Med objXLApp

. Workbooks. Open ”C : \ File. xls ” . .

Arbetsböcker (1 ) Arbetsblad (1) Välj

För intLoopCounter=1 För att CInt ( . ActiveSheet. Cells. SpecialCells ( xlCellTypeLastCell ) . Rad )

List1. AddItem . Range ( ” A ” intLoopCounter )

Nästa intLoopCounter

. Arbetsböcker (1) . Close Falskt

. Avsluta

End With

Set objXLApp=Inget

End Sub
5
Ändra ” C : . \ fil . xls ”till din Excel-filnamn . Detta kommer nu importera data från ditt Excel-ark .