В этой статье блога мы рассмотрим различные способы добавления нового листа Excel с помощью VB.NET. Независимо от того, являетесь ли вы новичком или опытным разработчиком, эти методы помогут вам улучшить свои навыки работы с VB.NET и эффективно управлять файлами Excel. Итак, давайте углубимся и найдем несколько полезных примеров кода!

Метод 1: использование библиотеки Interop
Библиотека Interop предоставляет мощный набор функций для работы с файлами Excel в VB.NET. Чтобы добавить новый лист, выполните следующие действия:

Imports Microsoft.Office.Interop.Excel
' Create an instance of Excel Application
Dim excelApp As New Application()
' Open an existing workbook or create a new one
Dim workbook As Workbook = excelApp.Workbooks.Open("C:\Path\To\Workbook.xlsx")
' Add a new sheet
Dim newSheet As Worksheet = workbook.Worksheets.Add()
' Set the sheet name
newSheet.Name = "New Sheet"
' Save the workbook
workbook.Save()
' Close the workbook and release resources
workbook.Close()
excelApp.Quit()

Метод 2: использование библиотеки EPPlus
EPPlus — это популярная библиотека с открытым исходным кодом, которая упрощает работу с файлами Excel в VB.NET. Вот как вы можете добавить новый лист с помощью EPPlus:

Imports OfficeOpenXml
' Create a new Excel package
Using package As New ExcelPackage(New FileInfo("C:\Path\To\Workbook.xlsx"))
    ' Add a new sheet
    Dim newSheet As ExcelWorksheet = package.Workbook.Worksheets.Add("New Sheet")
    ' Save the package
    package.Save()

End Using

Метод 3: использование подключения OleDb
Другой подход к добавлению нового листа — использование подключения OleDb для взаимодействия с файлами Excel. Вот пример:

Imports System.Data.OleDb
' Specify the connection string
Dim connectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Path\To\Workbook.xlsx;Extended Properties='Excel 12.0'"
' Create a new connection
Using connection As New OleDbConnection(connectionString)
    connection.Open()
    ' Create a new command
    Dim command As New OleDbCommand()
    command.Connection = connection
    ' Add a new sheet
    command.CommandText = "CREATE TABLE [New Sheet$] (ID INT, Name VARCHAR(255))"
    command.ExecuteNonQuery()
    ' Close the connection
    connection.Close()
End Using

Добавление нового листа Excel в VB.NET — это простой процесс, и в вашем распоряжении есть несколько методов. Независимо от того, предпочитаете ли вы использовать библиотеку Interop, EPPlus или соединение OleDb, эти методы позволят вам эффективно манипулировать файлами Excel. Так что смело начинайте включать эти методы в свои проекты VB.NET!