Displaying items by tag: xlsnetconditionalformatting

PM> Install-Package Spire.XLS

using Spire.Xls;
using Spire.Xls.Core;
using Spire.Xls.Core.Spreadsheet.Collections;
using System.Drawing;

namespace HighlightValues
{
    class Program
    {
        static void Main(string[] args)
        {
            {

                //Workbookインスタンスを作成する
                Workbook workbook = new Workbook();

                //Excelドキュメントを読み込む
                workbook.LoadFromFile("sample.xlsx");

                //最初のシートを取得する
                Worksheet sheet = workbook.Worksheets[0];

                //ワークシートに条件付き書式を追加する
                XlsConditionalFormats format = sheet.ConditionalFormats.Add();

                //条件付き書式を適用する範囲を設定する
                format.AddRange(sheet.Range["B3:E9"]);

                //条件付き書式を適用して最高値を強調表示する
                IConditionalFormat condition1 = format.AddTopBottomCondition(TopBottomType.Top, 1);
                condition1.BackColor = Color.LightBlue;

                //条件付き書式を適用して下位2つの値を強調表示する
                IConditionalFormat condition2 = format.AddTopBottomCondition(TopBottomType.Bottom, 2);
                condition2.BackColor = Color.LightGreen;

                //結果文書を保存する
                workbook.SaveToFile("TopBottomValues.xlsx", ExcelVersion.Version2013);

            }
        }
    }
}

Imports Spire.XLS
Imports Spire.XLS.Core
Imports Spire.XLS.Core.Spreadsheet.Collections
Imports System.Drawing

Namespace HighlightValues
    Class Program
        Private Shared Sub Main(ByVal args() As String)

            'Workbookインスタンスを作成する
            Dim workbook As Workbook = New Workbook

            'Excelドキュメントを読み込む
            workbook.LoadFromFile("sample.xlsx")

            '最初のシートを取得する
            Dim sheet As Worksheet = workbook.Worksheets(0)

            'ワークシートに条件付き書式を追加する
            Dim format As XlsConditionalFormats = sheet.ConditionalFormats.Add

            '条件付き書式を適用する範囲を設定する
            format.AddRange(sheet.Range("B3:E9"))

            '条件付き書式を適用して最高値を強調表示する
            Dim condition1 As IConditionalFormat = format.AddTopBottomCondition(TopBottomType.Top, 1)
            condition1.BackColor = Color.LightBlue

            '条件付き書式を適用して下位2つの値を強調表示する
            Dim condition2 As IConditionalFormat = format.AddTopBottomCondition(TopBottomType.Bottom, 2)
            condition2.BackColor = Color.LightGreen

            '結果文書を保存する
            workbook.SaveToFile("TopBottomValues.xlsx", ExcelVersion.Version2013)
        End Sub
    End Class
End Namespace

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("sample.xlsx");

            //最初のシートを取得する
            Worksheet sheet = workbook.Worksheets[0];

            //ワークシートに条件付き書式を追加する
            XlsConditionalFormats xcfs = sheet.ConditionalFormats.Add();

            //条件付き書式を適用する範囲を設定する
            xcfs.AddRange(sheet.Range["C2:C13"]);

            //条件を追加し、その書式タイプをDataBarに設定する
            IConditionalFormat format = xcfs.AddCondition();
            format.FormatType = ConditionalFormatType.DataBar;

            //データバーの塗りつぶし効果と色を設定する
            format.DataBar.BarFillType = DataBarFillType.DataBarFillGradient;
            format.DataBar.BarColor = Color.Green;

            //結果ファイルを保存する
            workbook.SaveToFile("ApplyDataBarsToDataRange.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

    Class Program

        Private Shared Sub Main(ByVal args() As String)
            'Workbookインスタンスを作成する
            Dim workbook As Workbook = New Workbook

            'Excelファイルを読み込む
            workbook.LoadFromFile("sample.xlsx")

            '最初のシートを取得する
            Dim sheet As Worksheet = workbook.Worksheets(0)

            'ワークシートに条件付き書式を追加する
            Dim xcfs As XlsConditionalFormats = sheet.ConditionalFormats.Add

            '条件付き書式を適用する範囲を設定する
            xcfs.AddRange(sheet.Range("C2:C13"))

            '条件を追加し、その書式タイプをDataBarに設定する
            Dim format As IConditionalFormat = xcfs.AddCondition
            format.FormatType = ConditionalFormatType.DataBar

            'データバーの塗りつぶし効果と色を設定する
            format.DataBar.BarFillType = DataBarFillType.DataBarFillGradient
            format.DataBar.BarColor = Color.Green

            '結果ファイルを保存する
            workbook.SaveToFile("ApplyDataBarsToDataRange.xlsx", ExcelVersion.Version2013)
        End Sub
    End Class
End Namespace