Immer wieder werden wir gefragt, wie man eine Excel-Tabelle am einfachsten in einer VB-Anwendung einbinden kann. Sei es, um die Excel-Tabelle bearbeiten zu können oder einfach nur um die Daten anzuzeigen. Was ist eine Excel-Tabelle? Welches Format hat eine solche Datei? Eine Excel-Tabelle ist nichts anderes als eine Datenbank - ja sie lesen richtig - eine ISAM-Datenquelle. Und da Visual Basic von Haus aus sehr gut mit Datenbanken klar kommt, was liegt also näher, eine Excel-Datei als Datenbank und die entsprechende Tabelle als Recordset zu öffnen? Alles was Sie brauchen ist ein ISAM Datenbank-Zugriff - und den bekommen Sie, indem Sie einen Verweis auf die Microsoft DAO 3.x Library setzen. Für die Darstellung der Excel-Tabellen-Daten eignet sich das DataGrid-Control hervorragend. Fügen wir also der Form zunächst ein DataGrid-Control hinzu. Für die Bindung zur Datenquelle (der Excel-Datei) benötigen wir noch ein Data-Control. In der Eigenschaft DataSource des DataGrids wählen wir dann als Quelle eben dieses DataControl aus. Alles andere erledigen wir per Code. ' Excel-Tabelle im DataGrid anzeigen (DAO) Dim sExcelFile As String Dim sTabelle As String ' vollständiger Pfad zur Excel-Datei sExcelFile = "C:\Eigene Dateien\Excel\Adressen.xls" ' Tabellen-Name sTabelle = "Tabelle1" ' Eigenschaften des Data-Controls With Data1 .DatabaseName = sExcelFile ' Connect-Strings: ' Excel 97: "Excel 8.0;" ' Excel 2000: "Excel 9.0;" ' Excel XP: "Excel 10.0;" .Connect = "Excel 8.0;" ' Excel 97 ' WICHTIG! abschliessendes $-Zeichen .RecordSource = sTabelle & "$" ' Daten im DataGrid anzeigen .Refresh End With Dieser Tipp wurde bereits 32.197 mal aufgerufen. Voriger Tipp | Zufälliger Tipp | Nächster Tipp
Anzeige
Diesen und auch alle anderen Tipps & Tricks finden Sie auch auf unserer aktuellen vb@rchiv Vol.6 (einschl. Beispielprojekt!) Ein absolutes Muss - Geballtes Wissen aus mehr als 8 Jahren vb@rchiv! - nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten - Symbol-Galerie mit mehr als 3.200 Icons im modernen Look Weitere Infos - 4 Entwickler-Vollversionen (u.a. sevFTP für .NET), Online-Update-Funktion u.v.m. |
vb@rchiv CD Vol.6 Geballtes Wissen aus mehr als 8 Jahren vb@rchiv! Online-Update-Funktion Entwickler-Vollversionen u.v.m. Tipp des Monats März 2024 Dieter Otter UTF-8 Konvertierung von Dateien und Strings VB6 selbst verfügt über keine Funktionen zur UTF-8 Konvertierung von Daten. Mit Hilfe des ADODB.Stream-Objekts lassen sich diese fehlenden Funktionen aber schnell nachrüsten. TOP! Unser Nr. 1 Neu! sevDataGrid 3.0 Mehrspaltige Listen, mit oder ohne DB-Anbindung. Autom. Sortierung, Editieren von Spalteninhalten oder das interaktive Hinzufügen von Datenzeilen sind ebenso möglich wie das Erstellen eines Web-Reports. |
||||||||||||||||
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein. |