Wie man eine Excel-Datei in VB.NET öffnet

Wie installiere ich IronXL in meinem VB.NET-Projekt?

Der Einstieg mit IronXL dauert nur Sekunden. Öffnen Sie Visual Studio 2022, navigieren Sie zu Ihrem VB.NET-Projekt und verwenden Sie die Package Manager Console:

Install-Package IronXL.Excel

Alternativ können Sie auf Ihr Projekt rechtsklicken, "NuGet-Pakete verwalten" wählen, nach "IronXL" suchen und auf Installieren klicken.

Nach der Installation fügen Sie diese einzelne Importanweisung zu Ihrer VB.NET-Datei hinzu:

Imports IronXL

Imports IronXL

Das war's. Keine komplexen COM-Verweise, keine Office-Abhängigkeiten, keine versionsspezifischen Assemblies. Ihr VB.NET-Excel-Dateileser ist bereit, auf jedem Rechner zu arbeiten. Für detaillierte Einrichtungshinweise schauen Sie sich unser VB.NET Excel-Dateien-Tutorial an.

Einfaches Code-Beispiel: Ein Excel-Dokument mit IronXL lesen

Hier ist ein vollständiges funktionierendes Beispiel, um ein Excel-Arbeitsbuch in VB.NET zu öffnen und die Daten zu lesen:

Imports IronXL
Module Program
    Sub Main()
        ' Load any Excel file - XLSX, XLS, CSV, or TSV
        Dim workbook As WorkBook = WorkBook.Load("example.xlsx")
        ' Access the worksheet with our sales data (the second sheet)
        Dim worksheet As WorkSheet = workbook.WorkSheets(1)
        ' Read a specific cell value
        Dim revenue As Decimal = worksheet("E2").DecimalValue
        Console.WriteLine($"Order Total: {revenue}")
        ' Read a range of cells
        For Each cell In worksheet("C2:C6")
            Console.WriteLine($"Product: {cell.Text}")
        Next
    End Sub
End Module

Imports IronXL
Module Program
    Sub Main()
        ' Load any Excel file - XLSX, XLS, CSV, or TSV
        Dim workbook As WorkBook = WorkBook.Load("example.xlsx")
        ' Access the worksheet with our sales data (the second sheet)
        Dim worksheet As WorkSheet = workbook.WorkSheets(1)
        ' Read a specific cell value
        Dim revenue As Decimal = worksheet("E2").DecimalValue
        Console.WriteLine($"Order Total: {revenue}")
        ' Read a range of cells
        For Each cell In worksheet("C2:C6")
            Console.WriteLine($"Product: {cell.Text}")
        Next
    End Sub
End Module

Die WorkBook.The Load() Methode erkennt automatisch das Dateiformat; es ist nicht notwendig, anzugeben, ob es im XLS- oder XLSX-Format ist. Zugriff auf Excel-Tabellenblätter nach Index oder Dateiname mit workbook.GetWorkSheet("Sheet1"). Jede Zelle gibt typisierte Werte über Eigenschaften wie IntValue, DecimalValue, DateTimeValue oder die universelle Text-Eigenschaft zurück. Für komplexere Szenarien erkunden Sie unsere Excel-Formeldokumentation.

Wie Sie hier sehen können, hat IronXL erfolgreich die Datei geöffnet und die Summe der Bestellung gelesen, die wir zu lesen aufgefordert haben. Es konnte auch Informationen aus jedem Produkt, das in allen Bestellungen verkauft wurde, lesen und extrahieren.

Wie kann ich unterschiedliche Typen von Excel-Daten lesen?

IronXL geht intelligent mit allen Excel-Datentypen um, wenn Sie Excel VB.NET-Dateien lesen. So arbeiten Sie mit verschiedenen Datenszenarien:

' Open workbook from any location using the filename and path
Dim wb As WorkBook = WorkBook.Load("C:\Data\Inventory.xlsx")
Dim ws As WorkSheet = wb.GetWorkSheet("Products")
' Read different data types safely
Dim productName As String = ws("A2").StringValue
Dim quantity As Integer = ws("B2").IntValue  
Dim price As Decimal = ws("C2").DecimalValue
Dim lastUpdated As DateTime = ws("D2").DateTimeValue
' Process entire columns efficiently
Dim totalStock As Decimal = ws("B2:B100").Sum()
Dim maxPrice As Decimal = ws("C2:C100").Max()
' Iterate through all used cells starting at row index 1 to skip header (zero-based index)
 For i As Integer = 1 To ws.Rows.Count - 1
    Dim row = ws.Rows(i)
    ' Stop at first completely empty row
    If row.Columns(0).Value Is Nothing AndAlso row.Columns(1).Value Is Nothing AndAlso
       row.Columns(2).Value Is Nothing AndAlso row.Columns(3).Value Is Nothing Then Exit For
    ' Read values safely
    Dim sku As String = If(row.Columns(0).Value IsNot Nothing, row.Columns(0).StringValue, "")
    Dim stock As Integer = If(row.Columns(1).Value IsNot Nothing, row.Columns(1).IntValue, 0)
    Dim priceVal As Decimal = If(row.Columns(2).Value IsNot Nothing, row.Columns(2).DecimalValue, 0D)
    Dim rwLastUpdated As DateTime? = If(row.Columns(3).Value IsNot Nothing, row.Columns(3).DateTimeValue, Nothing)
    ' Format date
    Dim lastUpdatedStr As String = If(rwLastUpdated.HasValue, rwLastUpdated.Value.ToString("dd/MM/yyyy"), "")
    ' Print only rows with data
    If sku <> "" OrElse stock <> 0 OrElse priceVal <> 0D OrElse lastUpdatedStr <> "" Then
        Console.WriteLine($"SKU: {sku}, Stock: {stock}, Price: {priceVal:C}, Last Updated: {lastUpdatedStr}")
    End If
Next

' Open workbook from any location using the filename and path
Dim wb As WorkBook = WorkBook.Load("C:\Data\Inventory.xlsx")
Dim ws As WorkSheet = wb.GetWorkSheet("Products")
' Read different data types safely
Dim productName As String = ws("A2").StringValue
Dim quantity As Integer = ws("B2").IntValue  
Dim price As Decimal = ws("C2").DecimalValue
Dim lastUpdated As DateTime = ws("D2").DateTimeValue
' Process entire columns efficiently
Dim totalStock As Decimal = ws("B2:B100").Sum()
Dim maxPrice As Decimal = ws("C2:C100").Max()
' Iterate through all used cells starting at row index 1 to skip header (zero-based index)
 For i As Integer = 1 To ws.Rows.Count - 1
    Dim row = ws.Rows(i)
    ' Stop at first completely empty row
    If row.Columns(0).Value Is Nothing AndAlso row.Columns(1).Value Is Nothing AndAlso
       row.Columns(2).Value Is Nothing AndAlso row.Columns(3).Value Is Nothing Then Exit For
    ' Read values safely
    Dim sku As String = If(row.Columns(0).Value IsNot Nothing, row.Columns(0).StringValue, "")
    Dim stock As Integer = If(row.Columns(1).Value IsNot Nothing, row.Columns(1).IntValue, 0)
    Dim priceVal As Decimal = If(row.Columns(2).Value IsNot Nothing, row.Columns(2).DecimalValue, 0D)
    Dim rwLastUpdated As DateTime? = If(row.Columns(3).Value IsNot Nothing, row.Columns(3).DateTimeValue, Nothing)
    ' Format date
    Dim lastUpdatedStr As String = If(rwLastUpdated.HasValue, rwLastUpdated.Value.ToString("dd/MM/yyyy"), "")
    ' Print only rows with data
    If sku <> "" OrElse stock <> 0 OrElse priceVal <> 0D OrElse lastUpdatedStr <> "" Then
        Console.WriteLine($"SKU: {sku}, Stock: {stock}, Price: {priceVal:C}, Last Updated: {lastUpdatedStr}")
    End If
Next

IronXL verarbeitet leere Zellen, zusammengeführte Zellen und Formeln automatisch. Die VB.NET Excel-Bibliothek berechnet Formeln neu, wenn Sie sie lesen, sodass Sie immer aktuelle Werte erhalten. Für große Datensätze verwenden Sie Aggregatfunktionen wie Sum(), Average(), Min() und Max() für optimale Leistung. Müssen Sie Daten exportieren? Erfahren Sie, wie Sie Excel in CSV konvertieren.

Was ist ein praktisches Beispiel für den Produktionseinsatz?

Erstellen wir einen echten Lagerbestandsprüfer, der mehrere Excel-Blätter verarbeitet, indem wir VB.NET verwenden, um Excel-Dateien zu öffnen:

Imports IronXL
Imports System.IO
Public Class ExcelInventoryReader
    Public Function CheckLowStock(filePath As String) As List(Of String)
        Dim lowStockItems As New List(Of String)
        Try
            Dim workbook As WorkBook = WorkBook.Load(filePath)
            ' Process all worksheets in the workbook
            For Each sheet As WorkSheet In workbook.WorkSheets
                Console.WriteLine($"Checking {sheet.Name}...")
                ' Find items with stock below 10 units
                For rowIndex As Integer = 2 To sheet.RowCount
                    Dim itemName As String = sheet($"A{rowIndex}").StringValue
                    Dim stockLevel As Integer = sheet($"B{rowIndex}").IntValue
                    If stockLevel < 10 AndAlso Not String.IsNullOrEmpty(itemName) Then
                        lowStockItems.Add($"{itemName} - {stockLevel} units ({sheet.Name})")
                    End If
                Next
            Next
        Catch ex As Exception
            Console.WriteLine($"Error reading Excel file: {ex.Message}")
        End Try
        Return lowStockItems
    End Function
End Class

Imports IronXL
Imports System.IO
Public Class ExcelInventoryReader
    Public Function CheckLowStock(filePath As String) As List(Of String)
        Dim lowStockItems As New List(Of String)
        Try
            Dim workbook As WorkBook = WorkBook.Load(filePath)
            ' Process all worksheets in the workbook
            For Each sheet As WorkSheet In workbook.WorkSheets
                Console.WriteLine($"Checking {sheet.Name}...")
                ' Find items with stock below 10 units
                For rowIndex As Integer = 2 To sheet.RowCount
                    Dim itemName As String = sheet($"A{rowIndex}").StringValue
                    Dim stockLevel As Integer = sheet($"B{rowIndex}").IntValue
                    If stockLevel < 10 AndAlso Not String.IsNullOrEmpty(itemName) Then
                        lowStockItems.Add($"{itemName} - {stockLevel} units ({sheet.Name})")
                    End If
                Next
            Next
        Catch ex As Exception
            Console.WriteLine($"Error reading Excel file: {ex.Message}")
        End Try
        Return lowStockItems
    End Function
End Class

Dieser produktionsreife VB.NET-Code demonstriert Fehlerbehandlung, Multi-Sheet-Verarbeitung und praktische Geschäftslogik. IronXL verarbeitet Dateien bis zu 10 MB effizient im Speicher. Für größere Dateien ziehen Sie in Betracht, diese in Teilen zu verarbeiten, indem Sie spezifische Bereichsauswahlen verwenden. Häufige Probleme wie Dateiberechtigungen werden in unseren Fehlerbehebungshandbüchern behandelt. Für Diskussionen über VB.NET-Excel-Automatisierung bieten die Microsoft Q&A-Foren Community-Support.

Abschluss

Mit IronXL war das Lesen und Verarbeiten von Excel-Dateien in VB.NET noch nie einfacher – und Sie benötigen keine installierte Microsoft Office. Von sicherem Lesen mehrerer Datentypen, Iteration über große Arbeitsblätter, Handhabung von Formeln und leeren Zellen bis hin zur Verarbeitung von Multi-Sheet-Arbeitsmappen vereinfacht IronXL jeden Aspekt der Excel-Automatisierung.

Diese moderne .NET-Bibliothek beseitigt Interop-Komplexität, vermeidet Versionskonflikte und funktioniert nahtlos auf Windows, Linux und Cloud-Umgebungen. Egal, ob Sie einen kleinen Lagerbestandsprüfer erstellen oder Unternehmensdaten im Excel-Format verarbeiten, IronXL bietet zuverlässige Leistung, prägnanten Code und robuste Fehlerbehandlung.

Bereit, Ihre VB.NET Excel-Workflows zu optimieren? Starten Sie noch heute Ihre kostenlose IronXL-Testversion und erleben Sie eine schnellere, sauberere und vollständig office-unabhängige Arbeitsweise mit Excel-Dateien. Explore our documentation and tutorials to unlock the full power of IronXL in your applications.

Starten Sie jetzt mit IronXL.

Jetzt kostenlos starten