通过在备选行或列上添加颜色,可以使大型工作表更容易扫描和阅读。应用内置表样式或使用条件格式是替换行颜色的两种快速方法。本文将以 C# 及 VB.NET 代码为例,介绍如何通过 Spire.XLS for .NET 在 Excel 中使用条件格式设置交替行颜色。
安装 Spire.XLS for .NET
首先,您需要添加 Spire.XLS for .NET 包中包含的 DLL 文件作为 .NET 项目中的引用。DLL 文件可以从此链接下载或通过 NuGet 安装。
PM> Install-Package Spire.XLS
在 Excel 中设置交替行颜色
使用 Spire.XLS for .NET为 Excel 中的替代行添加颜色的步骤如下:
- 创建一个 Workbook 对象
- 使用 Workbook.LoadFromFile() 方法加载 Excel 文件。
- 通过 Workbook.Worsheets[index] 属性从工作簿中获取特定的工作表。
- 使用 Worksheet.ConditionalFormats.Add() 方法向工作表添加条件格式,并返回 XlsConditionalFormats 类的对象。
- 使用 XlsConditionalFormats.AddRange() 方法设置应用条件格式的单元格范围。
- 使用 XlsConditionalFormats.AddCondition() 方法添加条件,然后设置条件公式和偶数行的单元格颜色。添加另一个条件以更改奇数行单元格的格式。
- 使用 Workbook.SaveToFile() 方法保存为 Excel 文件。
- C#
- VB.NET
using Spire.Xls;
using Spire.Xls.Core;
using Spire.Xls.Core.Spreadsheet.Collections;
using System.Drawing;
namespace AlternateRowColors
{
class Program
{
static void Main(string[] args)
{
//创建一个Workbook对象
Workbook workbook = new Workbook();
//加载 Excel 文件
workbook.LoadFromFile("商品采买表.xlsx");
//获取特定的工作表
Worksheet sheet = workbook.Worksheets[0];
//向工作表添加条件格式
XlsConditionalFormats format = sheet.ConditionalFormats.Add();
//设置应用条件格式的范围
format.AddRange(sheet.Range[2, 1, sheet.LastRow, sheet.LastColumn]);
//添加条件以根据公式更改单元格的格式
IConditionalFormat condition1 = format.AddCondition();
condition1.FirstFormula = "=MOD(ROW(),2)=0";
condition1.FormatType = ConditionalFormatType.Formula;
condition1.BackColor = Color.Yellow;
//添加另一个条件以根据公式更改单元格的格式
IConditionalFormat condition2 = format.AddCondition();
condition2.FirstFormula = "=MOD(ROW(),2)=1";
condition2.FormatType = ConditionalFormatType.Formula;
condition2.BackColor = Color.LightGreen;
//保存文件
workbook.SaveToFile("交替行颜色.xlsx", ExcelVersion.Version2016);
}
}
}
Imports Spire.Xls
Imports Spire.Xls.Core
Imports Spire.Xls.Core.Spreadsheet.Collections
Imports System.Drawing
Namespace AlternateRowColors
Friend Class Program
Private Shared Sub Main(ByVal args As String())
'创建一个Workbook对象
Dim workbook As Workbook = New Workbook()
'加载 Excel 文件
workbook.LoadFromFile("商品采买表.xlsx")
'获取特定的工作表
Dim sheet As Worksheet = workbook.Worksheets(0)
'向工作表添加条件格式
Dim format As XlsConditionalFormats = sheet.ConditionalFormats.Add()
'设置应用条件格式的范围
format.AddRange(sheet.Range(2, 1, sheet.LastRow, sheet.LastColumn))
'添加条件以根据公式更改单元格的格式
Dim condition1 As IConditionalFormat = format.AddCondition()
condition1.FirstFormula = "=MOD(ROW(),2)=0"
condition1.FormatType = ConditionalFormatType.Formula
condition1.BackColor = Color.Yellow
'添加另一个条件以根据公式更改单元格的格式
Dim condition2 As IConditionalFormat = format.AddCondition()
condition2.FirstFormula = "=MOD(ROW(),2)=1"
condition2.FormatType = ConditionalFormatType.Formula
condition2.BackColor = Color.LightGreen
'保存文件
workbook.SaveToFile("交替行颜色.xlsx", ExcelVersion.Version2016)
End Sub
End Class
End Namespace
申请临时 License
如果您希望删除结果文档中的评估消息,或者摆脱功能限制,请该Email地址已收到反垃圾邮件插件保护。要显示它您需要在浏览器中启用JavaScript。获取有效期 30 天的临时许可证。