Gewusst wie: Anzeigen von Excel-Arbeitsblatt-Daten an ein Datagrid-Steuerelement von Visual Basic 6

Anzeigen von Excel-Daten an eine Visual Basic 6.0-DataGrid-Steuerelement kann Ihre VB6-Anwendungen benutzerfreundlicher machen durch die Möglichkeit, Daten aus Excel anzuzeigen. VB6 ist eine von Microsoft entwickelte Programmiersprache. VB6 wurde von Visual Basic (VB) ersetzt, die das NET-Framework verwendet. Ein DataGrid-Steuerelement dient zum Anzeigen von Daten in tabellarischer Form ähnlich einer Datenbanktabelle. Verwenden von ADO zum Herstellen der Verbindung zu Excel und Abfrage der Kalkulationstabelle mit einer "Select" SQL-Anweisung. Sobald die Verbindung zu Excel machen, können Sie eine Recordset verwenden, Zugriff auf die Daten.

Anweisungen

1 Kopieren Sie und fügen Sie den folgenden Code zum Erstellen einer neuen Sub-Prozedur und die Variablen, die Sie zum Herstellen der Verbindung zu Excel verwenden:

Private Sub displayExcelInDataGrid()

Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset Dim sconn As String Dim sFile As String2

Definieren Sie den Pfad zu Ihrem Excel-Arbeitsblatt, und definieren Sie die Recordseteigenschaften:

sFile = "C:\Temp\myXLFile.xls" rs.CursorLocation = adUseClient rs.CursorType = adOpenKeyset rs.LockType = adLockBatchOptimistic3

Kopieren und fügen Sie die folgenden Code-Abfrage "Sheet1" aus Excel und über das DataGrid-Steuerelement mithilfe des Recordsets angezeigt:

sconn = "DRIVER=Microsoft Excel Driver (*.xls);" & "DBQ=" & sFile rs.Open "SELECT * FROM [sheet1$]", sconn Set DataGrid1.DataSource = rs

EndSub