c#/vb.net 在 excel 中添加数据条-k8凯发天生赢家

pm> install-package spire.xls

using spire.xls;
using spire.xls.core;
using spire.xls.core.spreadsheet.collections;
using spire.xls.core.spreadsheet.conditionalformatting;
using system.drawing;
namespace applydatabar
{
    class program
    {
        static void main(string[] args)
        {
            //创建workbook实例
            workbook workbook = new workbook();
            //加载excel文档示例
            workbook.loadfromfile("示例文档.xlsx");
            //获取第一个工作表
            worksheet sheet = workbook.worksheets[0];
            //向工作表中添加条件格式
            xlsconditionalformats xcfs = sheet.conditionalformats.add();
            //设置应用条件格式的范围
            xcfs.addrange(sheet.range["c2:c16"]);
            //添加条件并将其格式类型设置为databar
            iconditionalformat format = xcfs.addcondition();
            format.formattype = conditionalformattype.databar;
            //设置数据条的填充效果和颜色
            format.databar.barfilltype = databarfilltype.databarfillgradient;
            format.databar.barcolor = color.green;
            //保存结果文档
            workbook.savetofile("应用数据条到单元格范围.xlsx", excelversion.version2013);
        }
    }
}

imports spire.xls
imports spire.xls.core
imports spire.xls.core.spreadsheet.collections
imports spire.xls.core.spreadsheet.conditionalformatting
imports system.drawing
namespace applydatabar
    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 xcfs as xlsconditionalformats = sheet.conditionalformats.add()
            '设置应用条件格式的范围
            xcfs.addrange(sheet.range("c2:c16"))
            '添加条件并将其格式类型设置为databar
            dim format as iconditionalformat = xcfs.addcondition()
            format.formattype = conditionalformattype.databar
            '设置数据条的填充效果和颜色
            format.databar.barfilltype = databarfilltype.databarfillgradient
            format.databar.barcolor = color.green
            '保存结果文档
            workbook.savetofile("应用数据条到单元格范围.xlsx", excelversion.version2013)
        end sub
    end class
end namespace