C#/VB.NET设置Excel表格背景色-创新互联

在查看很多有复杂的数据的表格时，为了能够快速地找到所需要的数据组时，往往需要对该数据组进行分类，一个简单快速的方法就是对数据组所在的单元格填充背景颜色，这样就使得我们在阅读文件时能够直观的看到数据分类，既美观又实用。那对于开发者而言，我这里提供一个简单快速的方法，即用C#给单元格设置背景颜色。下面是我的操作方法，供参考。我这里使用了一个叫Spire.XLS for . NET的免费版组件，该产品由E-iceblue公司发布，具体详情可上官网了解（https://www.e-iceblue.cn/Introduce/Spire-XLS-NET.html），不废话，下面我演示一下我的操作。

原文件如图：

步骤：

1、添加命名空间

Using Spire.Xls;
Using System.Drawing;

2、初始化工作簿并加载文档

Workbook workbook =new Workbook();
workbook.LoadFromFile(@"C:\Users\Administrator\Desktop\test.xlsx",ExcelVersion.Version97to2003);
Worksheet worksheet =workbook.Worksheets[0];Worksheet worksheet = workbook.Worksheets[0];

3、设置单元格背景颜色

worksheet.Range["A1:C2"].Style.Color= Color.LightSeaGreen;
worksheet.Range["A3:C4"].Style.Color= Color.LightYellow;
worksheet.Range["A5:C19"].Style.Color= Color.SpringGreen;
worksheet.Range["A20:C21"].Style.Color = Color.DeepSkyBlue;
worksheet.Range["A22:C23"].Style.Color = Color.Yellow

4、保存并预览文件

workbook.SaveToFile("GradesRank.xls",ExcelVersion.Version97to2003;
System.Diagnostics.Process.Start(workbook.FileName);

完成以上步骤后文档背景颜色添加成功，如下图所示：

完整代码：

C#

using System.Drawing;
using Spire.Xls;
 
namespace background_color
{
    class Program
    {
        static void Main(string[] args)
        {
            Workbook workbook = new Workbook();
            workbook.LoadFromFile(@"C:\Users\Administrator\Desktop\test.xlsx", ExcelVersion.Version97to2003);
            Worksheet worksheet = workbook.Worksheets[0];
 
            //set the backgroundcolor of Range["A1:C2"]
            worksheet.Range["A1:C2"].Style.Color = Color.LightSeaGreen;
 
            //set the backgroundcolor of Range["A3:C4"]
            worksheet.Range["A3:C4"].Style.Color = Color.LightYellow;
 
            //set the backgroundcolor of Range["A5:C19"]
            worksheet.Range["A5:C19"].Style.Color = Color.SpringGreen;
 
            //set the backgroundcolor of Range["A20:C21"]
            worksheet.Range["A20:C21"].Style.Color = Color.DeepSkyBlue;
 
            //set the backgroundcolor of Range["A22:C23"]
            worksheet.Range["A22:C23"].Style.Color = Color.Yellow;
 
            //save and launch the project
            workbook.SaveToFile("Sample.xls", ExcelVersion.Version97to2003);
            System.Diagnostics.Process.Start(workbook.FileName);
        }
 
    }
}

VB.NET

Imports System.Drawing
Imports Spire.Xls

Namespace background_color
    
    Class Program
        
        Private Shared Sub Main(ByVal args() As String)
            Dim workbook As Workbook = New Workbook
            workbook.LoadFromFile("C:\Users\Administrator\Desktop\test.xlsx", ExcelVersion.Version97to2003)
            Dim worksheet As Worksheet = workbook.Worksheets(0)
            'set the backgroundcolor of Range["A1:C2"]
            worksheet.Range("A1:C2").Style.Color = Color.LightSeaGreen
            'set the backgroundcolor of Range["A3:C4"]
            worksheet.Range("A3:C4").Style.Color = Color.LightYellow
            'set the backgroundcolor of Range["A5:C19"]
            worksheet.Range("A5:C19").Style.Color = Color.SpringGreen
            'set the backgroundcolor of Range["A20:C21"]
            worksheet.Range("A20:C21").Style.Color = Color.DeepSkyBlue
            'set the backgroundcolor of Range["A22:C23"]
            worksheet.Range("A22:C23").Style.Color = Color.Yellow
            'save and launch the project
            workbook.SaveToFile("Sample.xls", ExcelVersion.Version97to2003)
            System.Diagnostics.Process.Start(workbook.FileName)
        End Sub
    End Class
End Namespace

创新互联www.cdcxhl.cn，专业提供香港、美国云服务器，动态BGP最优骨干路由自动选择，持续稳定高效的网络助力业务部署。公司持有工信部办法的idc、isp许可证， 机房独有T级流量清洗系统配攻击溯源，准确进行流量调度，确保服务器高可用性。佳节活动现已开启，新人活动云服务器买多久送多久。