IsAnyCellInColumnSelected メソッド (DefaultSheetSelectionModel)

指定した列のセルが選択範囲に含まれているかどうかを判定します。

構文

Visual Basic
C#

'Declaration
 
Public Overrides Function IsAnyCellInColumnSelected( _
   ByVal column As Integer _
) As Boolean

public override bool IsAnyCellInColumnSelected( 
   int column
)

パラメータ

column: チェックする列

戻り値の型

指定した列の任意のセルが選択されている場合はtrue、それ以外の場合はfalse

例

この例では、DefaultSheetSelectionModelをスプレッドシートのSelectionModelとして使用します。選択をオブジェクトに追加し、いくつかのメソッドとプロパティを設定し、各値をリストボックスに返します。ボタンクリックイベントで選択を削除できます。

C#
Visual Basic

private void Page_Load(object sender, System.EventArgs e)
{
    if (this.IsPostBack) return;

    FpSpread1.ActiveSheetView.ColumnCount = 8;
    FpSpread1.ActiveSheetView.RowCount = 10;
    FpSpread1.ActiveSheetView.SelectionBackColor = Color.Yellow;
    FarPoint.Web.Spread.Model.ISheetSelectionModel model = FpSpread1.ActiveSheetView.SelectionModel;

    bool b1, b2, b3;
    int i1;
    model.AddSelection(0, 0, 3, 3);
    b1 = model.IsAnyCellInColumnSelected(2);
    b2 = model.IsAnyCellInRowSelected(2);
    b3 = model.IsSelected(1,1);
    i1 = model.Count;
    ListBox1.Items.Add(Convert.ToString(b1));
    ListBox1.Items.Add(Convert.ToString(b2));
    ListBox1.Items.Add(Convert.ToString(b3));
    ListBox1.Items.Add(Convert.ToString(i1));
}

private void Button1_Click(object sender, System.EventArgs e)
{
    FarPoint.Web.Spread.Model.ISheetSelectionModel model = FpSpread1.Sheets[0].SelectionModel;
    model.RemoveSelection(0, 0, 3, 3);
}

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    If IsPostBack Then Return

    Dim b1, b2, b3 As Boolean
    Dim i1 As Integer
    FpSpread1.ActiveSheetView.ColumnCount = 8
    FpSpread1.ActiveSheetView.RowCount = 10
    FpSpread1.ActiveSheetView.SelectionBackColor = Color.Yellow
    Dim model As FarPoint.Web.Spread.Model.ISheetSelectionModel = FpSpread1.Sheets(0).SelectionModel
    model.AddSelection(0, 0, 3, 3)
    b1 = model.IsAnyCellInColumnSelected(2)
    b2 = model.IsAnyCellInRowSelected(2)
    b3 = model.IsSelected(1,1)
    i1 = model.Count
    ListBox1.Items.Add(b1)
    ListBox1.Items.Add(b2)
    ListBox1.Items.Add(b3)
    ListBox1.Items.Add(i1)
 End Sub

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim model As FarPoint.Web.Spread.Model.ISheetSelectionModel = FpSpread1.Sheets(0).SelectionModel
    model.RemoveSelection(0, 0, 3, 3)
 End Sub

参照

DefaultSheetSelectionModel クラス
 DefaultSheetSelectionModel メンバ
 IsAnyCellInColumnSelected メソッド
 IsSelected メソッド