カスタム名を設定したセル範囲を取得し、その範囲にスタイルなどを設定したい – MESCIUS ナレッジベース

作成日: 2024/02/21 最終更新日: 2024/02/21

文書種別

使用方法

詳細

カスタム名の設定はAddCustomNameメソッドで行い、カスタム名が指定されたセル範囲を取得する場合にはGetCustomNameメソッドを使用します。GetCustomNameメソッドでは、「Sheet1!$B$2:$E$5」というような文字列としてセル範囲が取得できます。これをWorksheetクラスのCellsプロパティに指定することでセル範囲に対してスタイルなどを設定することができます。

◎サンプルコード(VB)

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    FpSpread1.ActiveSheet.RowCount = 20
    FpSpread1.ActiveSheet.ColumnCount = 20

    ' データの設定
    For i = 0 To FpSpread1.ActiveSheet.RowCount - 1
        For j = 0 To FpSpread1.ActiveSheet.ColumnCount - 1
            FpSpread1.ActiveSheet.SetValue(i, j, i + j)
        Next
    Next

    ' 名前ボックスを設定
    NameBox1.Attach(FpSpread1)

    ' 数式ボックスの設定
    FormulaTextBox1.Attach(FpSpread1)

    ' カスタム名の設定
    FpSpread1.ActiveSheet.AddCustomName("test1", "$B$2:$E$5", 0, 0, True, "")
    FpSpread1.ActiveSheet.AddCustomName("test2", "$A:$A", 0, 0, True, "")
    FpSpread1.ActiveSheet.AddCustomName("test3", "$3:$3", 0, 0, True, "")
End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    ' カスタム名を指定して参照先を取得する
    Dim range1 = FpSpread1.ActiveSheet.GetCustomName("test1", 0, 0, True)
    Dim range2 = FpSpread1.ActiveSheet.GetCustomName("test2", 0, 0, True)
    Dim range3 = FpSpread1.ActiveSheet.GetCustomName("test3", 0, 0, True)

    ' 「test1」に背景色を設定する
    FpSpread1.ActiveSheet.AsWorksheet().Cells(range1).Interior.Color = GrapeCity.Spreadsheet.Color.FromKnownColor(GrapeCity.Core.KnownColor.Aqua)

    ' 「test2」に数式を設定する
    FpSpread1.ActiveSheet.AsWorksheet().Cells(range2).Formula = "SUM(B1:T1)"

    ' 「test3」に罫線を設定する
    FpSpread1.ActiveSheet.AsWorksheet().Cells(range3).Borders.LineStyle = GrapeCity.Spreadsheet.BorderLineStyle.Thin

End Sub

◎サンプルコード(C#)

private void Form1_Load(object sender, EventArgs e)
{
    fpSpread1.ActiveSheet.RowCount = 20;
    fpSpread1.ActiveSheet.ColumnCount = 20;

    // データの設定
    for (var i = 0; i <= fpSpread1.ActiveSheet.RowCount - 1; i++)
    {
        for (var j = 0; j <= fpSpread1.ActiveSheet.ColumnCount - 1; j++)
            fpSpread1.ActiveSheet.SetValue(i, j, i+j);
    }

    // 名前ボックスを設定
    nameBox1.Attach(fpSpread1);

    // 数式ボックスを設定
    formulaTextBox1.Attach(fpSpread1);

    // カスタム名の設定
    fpSpread1.ActiveSheet.AddCustomName("test1", "$B$2:$E$5", 0, 0, true, "");
    fpSpread1.ActiveSheet.AddCustomName("test2", "$A:$A", 0, 0, true, "");
    fpSpread1.ActiveSheet.AddCustomName("test3", "$3:$3", 0, 0, true, "");
}

private void button1_Click(object sender, EventArgs e)
{
    // カスタム名を指定して参照先を取得する
    var range1 = fpSpread1.ActiveSheet.GetCustomName("test1", 0, 0, true);
    var range2 = fpSpread1.ActiveSheet.GetCustomName("test2", 0, 0, true);
    var range3 = fpSpread1.ActiveSheet.GetCustomName("test3", 0, 0, true);

    // 「test1」に背景色を設定する
    fpSpread1.ActiveSheet.AsWorksheet().Cells[range1].Interior.Color = GrapeCity.Spreadsheet.Color.FromKnownColor(GrapeCity.Core.KnownColor.Aqua);

    // 「test2」に数式を設定する
    fpSpread1.ActiveSheet.AsWorksheet().Cells[range2].Formula = "SUM(B1:T1)";

    // 「test3」に罫線を設定する
    fpSpread1.ActiveSheet.AsWorksheet().Cells[range3].Borders.LineStyle = GrapeCity.Spreadsheet.BorderLineStyle.Thin;
}

＜実行イメージ＞

カスタム名.gif