VB .NET : Lire et créer des fichiers Excel (Tutoriel avec exemple de code)

Obtenez la bibliothèque IronXL Excel pour VB.NET en utilisant le téléchargement DLL ou NuGet . IronXL est notre première étape pour accéder rapidement aux données Excel dans nos projets VB.NET, et c'est ce que nous utiliserons pour ce tutoriel (gratuit pour le développement).

Install-Package IronXL.Excel

Tutoriel pratique

2.1. Créer un fichier Excel

Commençons par créer un classeur :

' Create a new Excel workbook with the default format (.xlsx)
Dim wb As New WorkBook

Le code ci-dessus sert à créer un nouveau fichier Excel. Par défaut, son extension est .xlsx.

2.2. Créer un fichier XLS

Si vous souhaitez créer un fichier avec l'extension .xls, vous pouvez utiliser ce code :

' Create a new Excel workbook with .xls format
Dim wb As New WorkBook(ExcelFileFormat.XLS)

2.3. Créer une feuille de travail

Après avoir créé le classeur, une feuille de calcul Excel peut être créée comme suit :

' Create a new worksheet named "Sheet1" in the workbook
Dim ws1 As WorkSheet = wb.CreateWorkSheet("Sheet1")

Le code ci-dessus créera une nouvelle feuille de calcul ws1 avec le nom Sheet1 dans le classeur wb.

2.4. Créer plusieurs feuilles de calcul

On peut créer autant de feuilles de calcul que nécessaire de la même manière :

' Create additional worksheets
Dim ws2 As WorkSheet = wb.CreateWorkSheet("Sheet2")
Dim ws3 As WorkSheet = wb.CreateWorkSheet("Sheet3")

3.1. Insérer des données dans les cellules

Nous pouvons maintenant facilement insérer des données dans les cellules de la feuille de calcul comme suit :

' Insert a value into a specific cell
worksheet("CellAddress").Value = "MyValue"

Par exemple, les données de la feuille de calcul ws1 peuvent être insérées comme suit :

' Insert "Hello World" into cell A1 of the worksheet
ws1("A1").Value = "Hello World"

Le code ci-dessus écrira Hello World dans la cellule A1 de la feuille de calcul ws1.

3.2. Insérer des données dans la plage

Il est également possible d'écrire des données dans plusieurs cellules à l'aide de la fonction range, comme suit :

' Insert "NewValue" into the range from cell A3 to A8
ws1("A3:A8").Value = "NewValue"

3.3. Exemple de création et de modification de feuilles de calcul

Nous allons créer un nouveau fichier Excel Sample.xlsx et y insérer des données pour illustrer le code que nous avons appris ci-dessus.

' Import IronXL namespace for Excel operations
Imports IronXL

' Main subroutine to create and edit Excel
Sub Main()
    ' Create a new workbook in XLSX format
    Dim wb As New WorkBook(ExcelFileFormat.XLSX)
    ' Create a worksheet named "Sheet1"
    Dim ws1 As WorkSheet = wb.CreateWorkSheet("Sheet1")
    ' Insert data into cells
    ws1("A1").Value = "Hello"
    ws1("A2").Value = "World"
    ' Insert a range of values
    ws1("B1:B8").Value = "RangeValue"
    ' Save the workbook as "Sample.xlsx"
    wb.SaveAs("Sample.xlsx")
End Sub

Remarque : Par défaut, le nouveau fichier Excel sera créé dans le dossier bin\Debug du projet. Si nous souhaitons créer un nouveau fichier dans un chemin personnalisé, utilisez :

wb.SaveAs(@"E:\IronXL\Sample.xlsx")

Voici la capture d'écran de notre fichier Excel nouvellement créé Sample.xlsx :

Il est clair à quel point il peut être simple de créer des fichiers Excel en utilisant IronXL dans une application VB .NET .

4.1. Accéder au fichier Excel du projet

WorkBook est la classe d' IronXL dont l'objet fournit un accès complet au fichier Excel et à ses fonctions. Par exemple, si nous voulons accéder au fichier Excel, il nous suffit d'utiliser :

' Load the Excel file "sample.xlsx" into a workbook
Dim wb As WorkBook = WorkBook.Load("sample.xlsx") 'Excel file path

Dans le code ci-dessus, la fonction WorkBook.Load() charge sample.xlsx dans wb. Tout type de fonction peut être effectué sur wb en accédant à des feuilles de calcul spécifiques du fichier Excel.

4.2. Accéder à une feuille de calcul spécifique

' Access worksheet by name
Dim ws As WorkSheet = wb.GetWorkSheet("Sheet1") 'by sheet name

' Access worksheet by index
Dim ws As WorkSheet = wb.WorkSheets(0) 'by sheet index

' Access the default worksheet
Dim ws As WorkSheet = wb.DefaultWorkSheet() 'for the default sheet

' Access the first worksheet in the workbook
Dim sheet As WorkSheet = wb.WorkSheets.FirstOrDefault() 'for the first sheet

5.1. Données provenant d'une colonne spécifique

Il est également possible d'obtenir des données à partir de plusieurs cellules d'une colonne spécifique de la manière suivante :

' Loop through cells in a specific range and print their values
For Each cell In ws("A2:A10")
    Console.WriteLine("value is: {0}", cell.Text)
Next cell

Il affichera les valeurs des cellules A2 à A10. Un exemple de code illustrant la discussion ci-dessus est donné ci-dessous.

' Example: Load and display values from a column
Imports IronXL

Sub Main()
    ' Load the workbook from file
    Dim wb As WorkBook = WorkBook.Load("sample.xlsx")
    ' Get the first worksheet
    Dim ws As WorkSheet = wb.WorkSheets.FirstOrDefault()
    ' Loop through cells in range A2:A10
    For Each cell In ws("A2:A10")
        Console.WriteLine("value is: {0}", cell.Text)
    Next
    Console.ReadKey()
End Sub

Le résultat suivant s'affichera :

Et nous pouvons voir une capture d'écran du fichier Excel Sample.xlsx :

Il est simple d'accéder aux données filtrées d'une feuille de calcul Excel en appliquant des fonctions d'agrégation telles que Somme, Min ou Max de la manière suivante :

' Aggregate functions on a range of data
Dim sum As Decimal = ws("From:To").Sum()
Dim min As Decimal = ws("From:To").Min()
Dim max As Decimal = ws("From:To").Max()

Vous pouvez en savoir plus sur les fonctions d'agrégation Excel ici.

' Example: Apply functions to data
Imports IronXL

Sub Main()
    ' Load the workbook
    Dim wb As WorkBook = WorkBook.Load("sample.xlsx")
    ' Get the first worksheet
    Dim ws As WorkSheet = wb.WorkSheets.FirstOrDefault()

    ' Perform aggregate calculations
    Dim sum As Decimal = ws("G2:G10").Sum()
    Dim min As Decimal = ws("G2:G10").Min()
    Dim max As Decimal = ws("G2:G10").Max()

    ' Print the results
    Console.WriteLine("Sum is: {0}", sum)
    Console.WriteLine("Min is: {0}", min)
    Console.WriteLine("Max is: {0}", max)
    Console.ReadKey()
End Sub

Ce code nous donnera cet affichage :

Et ce fichier Excel Sample.xlsx :

Vous trouverez plus d'informations sur la lecture des fichiers Excel dans l'article lié.

Accès rapide au tutoriel

### Documentation API de référence

Accédez à la documentation de référence de l'API IronXL et découvrez comment utiliser Excel facilement dans vos projets VB.NET. Vous y trouverez des listes de fonctionnalités, de fonctions, de classes et bien plus encore.

Documentation API de référence