在 Excel 文件中创建多个工作表可以使数据更加井然有序。例如，可以为不同的区域、不同的月份/年份或不同的项目等创建不同的工作表。但要区分多个工作表，则需要更改它们的名称。同时，设置不同的选项卡颜色也是突出显示一些重要工作表的好方法。在本文中，将详细展示如何通过 C#/VB.NET 以编程的方式重命名 Excel 工作表并设置选项卡颜色。
使用工具: FreeSpire.XLS for .NET（免费版）
程序环境：
本次测试时，在程序中引入 Free Spire.XLS for .NET。可通过以下方法引用 Spire.XLS.dll 文件：
方法 1：将 Free Spire.XLS for .NET 下载到本地，解压，安装。安装完成后，找到安装路径下 BIN 文件夹中的 Spire.XLS.dll。然后在 Visual Studio 中打开“解决方案资源管理器”，鼠标右键点击“引用”，“添加引用”，将本地路径 BIN 文件夹下的 dll 文件添加引用至程序。
方法 2：通过NuGet安装。可通过以下 2 种方法安装：
（1）可以在 Visual Studio 中打开“解决方案资源管理器”，鼠标右键点击“引用”，“管理 NuGet 包”，然后搜索“Free Spire.XLS”，点击“安装”。等待程序安装完成。
（2）将以下内容复制到 PM 控制台安装。
Install-Package FreeSpire.XLS -Version 12.7
重命名 Excel 工作表并设置选项卡颜色
创建一个 Workbook 对象。
使用 Workbook.LoadFromFile() 方法加载示例 Excel 文件。
使用 Workbook.Worksheets[int] 属性获取指定的工作表。
使用 Worksheet.Name 属性重命名指定的工作表。
使用 Worksheet.TabColor 属性设置指定工作表的选项卡颜色。
使用 Workbook.SaveToFile() 方法将文档保存到另一个文件。
【C#】
using Spire.Xls;using System.Drawing;
namespace RenameWorksheet{ class Program { static void Main(string[] args) { //Create a Workbook object Workbook workbook = new Workbook();
//Load a sample Excel file workbook.LoadFromFile("营业数据表.xlsx");
//Get the specified worksheet Worksheet worksheet = workbook.Worksheets[0]; Worksheet worksheet1 = workbook.Worksheets[1]; Worksheet worksheet2 = workbook.Worksheets[2];
//Rename Excel worksheet worksheet.Name = "数据"; worksheet1.Name = "图表"; worksheet2.Name = "总结";
//Set tab color worksheet.TabColor = Color.Pink; worksheet1.TabColor = Color.Gold; worksheet2.TabColor = Color.LightSkyBlue;
//Save to file workbook.SaveToFile("重命名并设置选项卡颜色.xlsx", ExcelVersion.Version2010); } }}
复制代码
【VB.NET】
Imports Spire.XlsImports System.Drawing
Namespace RenameWorksheet Friend Class Program Private Shared Sub Main(ByVal args As String()) 'Create a Workbook object Dim workbook As Workbook = New Workbook()
'Load a sample Excel file workbook.LoadFromFile("营业数据表.xlsx")
'Get the specified worksheet Dim worksheet As Worksheet = workbook.Worksheets(0) Dim worksheet1 As Worksheet = workbook.Worksheets(1) Dim worksheet2 As Worksheet = workbook.Worksheets(2)
'Rename Excel worksheet worksheet.Name = "数据" worksheet1.Name = "图表" worksheet2.Name = "总结"
'Set tab color worksheet.TabColor = Color.Pink worksheet1.TabColor = Color.Gold worksheet2.TabColor = Color.LightSkyBlue
'Save to file workbook.SaveToFile("重命名并设置选项卡颜色.xlsx", ExcelVersion.Version2010) End Sub End ClassEnd Namespace
复制代码
效果图
—本文完—
评论