Microsoft Excel ist ein Tabellenkalkulationsprogramm , mit dem Sie Tabellen zu organisieren und zu berechnen Daten und Graphen erstellen können. Visual Basic 6 ( VB6 ) ist eine Version von Visual Basic , die die Programmiersprache und eine integrierte Entwicklungsumgebung von Microsoft erstellt ist . Erstellen Informationen in Excel ist einfacher als in VB6, so ist es manchmal sinnvoll, Daten aus Excel in VB6 importieren. Es gibt mehrere Möglichkeiten , dies zu tun , aber die einfachste ist eine Zeile Code in Visual Basic , die den Prozess automatisiert . Anleitung
1

Starten Sie ein neues Visual Basic-Projekt .
2

Fügen Sie ein Listenfeld und Schaltfläche auf das Formular.
3 < p > Wählen Sie " Projekt-Menü " und wählen Sie dann die " Referenzen "-Option. Von dort holen die "Microsoft Excel -Bibliothek "-Zeile.
4

im folgenden Code eingeben .

Private Sub Command1_Click () Dim

objXLApp Als Excel. Anwendung

Dim intLoopCounter As Integer

Set objXLApp = New Excel.Application

objXLApp

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

. Workbooks (1). Worksheets (1). Wählen

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

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

Weiter intLoopCounter

. Workbooks (1). schließen Falsch

. Quit

End With

Set objXLApp = Nothing End Sub

5

ändern Sie die "C: \\ file.xls ", um Ihre Excel-Datei Namen. Dies wird nun die Daten aus Ihrer Excel-Tabelle.