Microsoft Excel är ett kalkylprogram som tillåter dig att skapa kalkylblad för att organisera och beräkna data och diagram . Visual Basic 6 ( VB6 ) är en version av Visual Basic , vilket är det programmeringsspråk och integrerad utvecklingsmiljö som skapats av Microsoft . Skapa uppgifter i Excel är lättare än i VB6 , så det är ibland praktiskt att importera data från Excel till VB6 . Det finns flera sätt att göra detta , men det enklaste är en kodrad i Visual Basic som automatiserar processen . Instruktioner
1
Starta ett nytt Visual Basic-projekt .
2
Lägg ett listrutan och kommandoknapp i formuläret .
3
Välj " Project Meny " och välj sedan " Referenser " alternativet . Därifrån plocka " Microsoft Excel Library " linje .
4
Ange i följande kod . Som Excel Review
Private Sub Command1_Click ( ) katalog
Dim objXLApp . ansökan
Dim intLoopCounter As Integer
Set objXLApp = Ny Excel.Application
objXLApp
Workbooks.Open . " C : \\ File.xls "
. Arbetsböcker ( 1 ) . arbetsblad ( 1 ) . Välj
För intLoopCounter = 1 Till CInt ( . ActiveSheet.Cells.SpecialCells ( xlCellTypeLastCell ) . Rad ) katalog
List1 . addItem . Range ( " A " & intLoopCounter ) katalog
Nästa intLoopCounter
. Arbetsböcker ( 1 ) . Stäng False
. Avsluta
avslutas med
Set objXLApp = Nothing
End Sub
5
ändra " C : \\ File.xls " till din Excel-fil namn . Detta kommer nu att importera data från ditt Excel-ark .
