Cómo escribir en un archivo de Excel en VB.NET (La manera fácil)

¿Cómo puedo empezar a utilizar la automatización de Excel en VB.NET?

Para comenzar a escribir archivos de Excel en su proyecto VB.NET, primero necesita agregar la biblioteca IronXL. El proceso es sencillo y se puede realizar directamente dentro de Visual Studio.

Primero, asegúrese de que su entorno de desarrollo esté listo:

• Visual Studio 2022 o posterior.
• Un proyecto activo dirigido a .NET Framework 4.6.2 o superior, o .NET Core/.NET 5+. IronXL es compatible con todas las versiones modernas de .NET, incluyendo .NET 9 y 10.

A continuación, instale el paquete NuGet de IronXL:

1. Abra el Administrador de Paquetes NuGet en Visual Studio.
2. Busca el paquete IronXL.Excel.
3. Haga clic en "Instalar".

Alternativamente, puede instalarlo a través de la Consola del Administrador de Paquetes con el siguiente comando:

Install-Package IronXL.Excel

Navegando al Administrador de Paquetes NuGet en el menú de Visual Studio para encontrar el paquete adecuado para la integración de Excel en VB.NET.

Una vez instalado, está listo para comenzar a escribir código. Solo tienes que añadir Imports IronXL al principio de tu archivo VB.NET para incluir las clases de la biblioteca en el ámbito.

Buscando el paquete IronXL para instalar la biblioteca necesaria para escribir datos en un archivo de Excel usando VB.NET.

¿Cómo puedo crear un nuevo archivo de Excel y escribir datos en él?

Crear un nuevo archivo de Excel desde cero es una tarea fundamental. Con IronXL, puede generar un libro de trabajo, agregar hojas de trabajo y poblar celdas con datos de cualquier fuente, como una colección de objetos. Esto es perfecto para tareas como exportar datos de aplicaciones o generar informes diarios.

Veamos un ejemplo práctico. Imaginemos que tenemos una lista de datos de productos que queremos exportar a una hoja de cálculo de Excel.

Imports IronXL
Imports System.Collections.Generic
Imports System.Linq

Public Class Product
    Public Property ID As Integer
    Public Property Name As String
    Public Property Price As Decimal
End Class

Module Program
    Sub Main(args As String())
        ' 1. Prepare a list of data to write to Excel.
        Dim products As New List(Of Product) From {
            New Product With {.ID = 1, .Name = "Laptop", .Price = 1200.50D},
            New Product With {.ID = 2, .Name = "Keyboard", .Price = 75.00D},
            New Product With {.ID = 3, .Name = "Mouse", .Price = 25.99D}
        }

        ' 2. Create a new Excel workbook and select the default worksheet.
        Dim workbook As WorkBook = WorkBook.Create()
        Dim sheet As WorkSheet = workbook.DefaultWorkSheet

        ' 3. Write headers for our data.
        sheet("A1").Value = "Product ID"
        sheet("B1").Value = "Product Name"
        sheet("C1").Value = "Price"

        ' Style the header row.
        Dim headerRange = sheet.GetRange("A1:C1")
        headerRange.Style.Font.Bold = True
        headerRange.Style.SetBackgroundColor("#D3D3D3") ' Light Gray

        ' 4. Iterate through the product list and write data to subsequent rows.
        For i As Integer = 0 To products.Count - 1
            Dim product = products(i)
            Dim row = i + 2 ' Start from the second row
            sheet("A" & row).Value = product.ID
            sheet("B" & row).Value = product.Name
            sheet("C" & row).Value = product.Price
        Next

        ' 5. Apply currency formatting to the price column.
        Dim priceColumn = sheet.GetRange("C2:C" & products.Count + 1)
        priceColumn.Style.Format = "$#,##0.00"

        ' 6. Auto-size columns for better readability.
        sheet.Columns.AutoFit()

        ' 7. Save the newly created and populated workbook to a file.
        workbook.SaveAs("ProductReport.xlsx")

    End Sub
End Module

¿Cómo puedo escribir datos en un archivo de Excel existente?

A menudo, no necesita crear un archivo nuevo, sino más bien agregar datos a uno existente. Esto es común para registros de registro, agregar registros a un conjunto de datos o actualizar un informe. IronXL hace que este proceso sea tan fácil como crear un nuevo archivo.

El siguiente ejemplo demuestra cómo abrir una hoja de cálculo existente, encontrar la última fila utilizada y agregar nuevos datos.

Imports IronXL
Imports System.Collections.Generic
Imports System.Linq

' (Assuming the Product class from the previous example is available)

Module Program
    Sub Main(args As String())
        ' Ensure the file from our previous example exists.
        If Not System.IO.File.Exists("ProductReport.xlsx") Then
            Console.WriteLine("Please run the first example to create ProductReport.xlsx")
            Return
        End If

        ' 1. Load the existing workbook from the file system.
        Dim workbook As WorkBook = WorkBook.Load("ProductReport.xlsx")
        Dim sheet As WorkSheet = workbook.DefaultWorkSheet

        ' 2. Find the first empty row to append new data.
        ' The LastRowUsed property gives us the last row with data.
        Dim lastRow = sheet.Info.LastRowUsed
        Dim newRowIndex = lastRow.RowNumber + 1

        ' 3. Define the new data to be added.
        Dim newProducts As New List(Of Product) From {
            New Product With {.ID = 4, .Name = "Monitor", .Price = 350.00D},
            New Product With {.ID = 5, .Name = "Webcam", .Price = 99.99D}
        }

        ' 4. Loop through the new data and write it to the worksheet.
        For i As Integer = 0 To newProducts.Count - 1
            Dim product = newProducts(i)
            Dim currentRow = newRowIndex + i
            sheet("A" & currentRow).Value = product.ID
            sheet("B" & currentRow).Value = product.Name
            sheet("C" & currentRow).Value = product.Price
        Next

        ' 5. Re-apply formatting and auto-fit columns to include new data.
        Dim priceColumn = sheet.GetRange("C2:C" & sheet.Info.LastRowUsed.RowNumber)
        priceColumn.Style.Format = "$#,##0.00"
        sheet.Columns.AutoFit()

        ' 6. Save the changes back to the original file.
        workbook.Save()

        ' Or save as a new file to preserve the original.
        ' workbook.SaveAs("ProductReport_Updated.xlsx")
    End Sub
End Module

¿Cómo escribo un DataTable en una hoja de cálculo de Excel?

Para los desarrolladores que trabajan con datos de fuentes como SQL Server, una tarea habitual es escribir el contenido de un DataTable directamente en una hoja de Excel. IronXL facilita esto con un método incorporado, eliminando la necesidad de recorrer filas y columnas manualmente.

Este ejemplo muestra cómo rellenar un DataTable y exportarlo a un nuevo archivo de Excel en un solo paso.

Imports IronXL
Imports System.Data

Module Program
    Sub Main(args As String())
        ' 1. Create and populate a DataTable. This often comes from a database query.
        Dim dt As New DataTable("EmployeeData")
        dt.Columns.Add("EmployeeID", GetType(Integer))
        dt.Columns.Add("FullName", GetType(String))
        dt.Columns.Add("Department", GetType(String))
        dt.Columns.Add("HireDate", GetType(Date))

        dt.Rows.Add(101, "John Smith", "Sales", New Date(2022, 5, 20))
        dt.Rows.Add(102, "Jane Doe", "Engineering", New Date(2021, 8, 15))
        dt.Rows.Add(103, "Peter Jones", "Marketing", New Date(2023, 1, 10))

        ' 2. Create a new workbook.
        Dim workbook As WorkBook = WorkBook.Create()
        Dim sheet As WorkSheet = workbook.CreateWorkSheet("Employees")

        ' 3. Write the DataTable to the worksheet starting at cell A1.
        ' The second parameter (True) indicates that column headers should be included.
        sheet.Write(dt, "A1", True)

        ' 4. Apply some styling for a more polished look.
        sheet.Columns.AutoFit()
        Dim headerRange = sheet.GetRange("A1:D1")
        headerRange.Style.Font.Bold = True
        headerRange.Style.SetBackgroundColor("#C5D9F1") ' Light Blue

        Dim dateColumn = sheet.GetRange("D2:D" & dt.Rows.Count + 1)
        dateColumn.Style.Format = "yyyy-mm-dd"

        ' 5. Save the workbook.
        workbook.SaveAs("EmployeeDatabaseExport.xlsx")
    End Sub
End Module

El método sheet.Write() es increíblemente eficaz para este fin. Asigna de forma inteligente la estructura DataTable a la hoja de cálculo, incluyendo los encabezados de columna si se especifican. Esta es una característica poderosa para cualquier aplicación basada en datos y un ahorrador de tiempo significativo en comparación con la iteración manual. Para más detalles sobre importación y exportación de datos, consulte nuestro tutorial sobre conversión entre diferentes formatos de hoja de cálculo.

¿Qué más puedo hacer al escribir archivos de Excel?

Escribir datos es solo el comienzo. Una biblioteca de Excel de VB.NET robusta debe ofrecer una gama completa de características para automatizar cualquier tarea de hoja de cálculo. IronXL proporciona capacidades extensas, incluyendo:

• Fórmulas: Establecer y calcular fórmulas mediante programación. Puede asignar una fórmula a la celda Value (por ejemplo, sheet("C1").Value = "=SUM(A1:B1)") e IronXL calculará el resultado.
• Gráficos: Crea diversos tipos de gráficos a partir de los datos de las hojas de cálculo para visualizar la información.
• Validación de datos: aplicar reglas a las celdas, como permitir solo números dentro de un rango específico o valores de una lista desplegable.
• Formato condicional: aplica estilos a las celdas en función de sus valores, lo que ayuda a resaltar los datos importantes.
• Seguridad y protección: Proteja hojas de cálculo o libros completos con contraseñas para controlar el acceso y evitar modificaciones.

Estas características permiten la automatización completa de generación de informes complejos y flujos de trabajo de análisis de datos directamente dentro de sus aplicaciones .NET.

Comience hoy mismo a escribir en archivos de Excel en VB.NET

Como se ha demostrado, escribir datos en archivos de Excel en VB.NET se simplifica significativamente al utilizar una biblioteca moderna como IronXL. Al evitar las complejidades y dependencias de Office Interop, puede construir aplicaciones más confiables, de mejor rendimiento y fácilmente desplegables. Tanto si necesitas crear archivos de Excel desde cero, añadir datos a informes existentes o exportar un DataTable, IronXL ofrece una API intuitiva y potente para realizar el trabajo de forma eficiente.

Puede descargar IronXL y probarlo con una licencia de prueba gratuita para ver lo fácil que puede integrarse en sus proyectos.

Para aquellos con necesidades más amplias, recuerde que IronXL también forma parte de Iron Suite for .NET. Con una única licencia, obtiene acceso a un conjunto completo de bibliotecas para manejar PDFs, códigos de barras, OCR y más, proporcionando un valor excepcional para cualquier desarrollador .NET.