MESCIUS SPREAD for Windows Forms 17.0J
GetSelections メソッド (SheetView)

シートで選択されたセルを含むFarPoint.Win.Spread.Model.CellRangeオブジェクトを、範囲同士ができるだけ重複しないようにして大きい順に並べた配列を取得します。
構文
'Declaration
 
Public Function GetSelections() As CellRange()
public CellRange[] GetSelections()

戻り値の型

選択範囲を含むCellRangeオブジェクトの配列
解説
このメソッドは、シートの選択モデル(Models.Selection)がIDisjointSelectionsインタフェースを実装しているかどうかによって結果が異なります。このインタフェースが選択モデルに実装されていない場合は、現在のアクティブセルに対応する単一のCellRangeオブジェクトが配列に返されます。
次のサンプルコードでは、このメンバを使用して、選択範囲の配列から最初の選択範囲を返しています。
DialogResult dlg; 
fpSpread1.ActiveSheet.SelectionPolicy = FarPoint.Win.Spread.Model.SelectionPolicy.MultiRange;
fpSpread1.ActiveSheet.AddSelection(0, 0, 2, 2);
fpSpread1.ActiveSheet.AddSelection(0, 3, 2, 2);
dlg = MessageBox.Show("Do you want to get one of the selections?", "GetSelection", MessageBoxButtons.YesNo);
if (dlg == DialogResult.Yes)
{
    FarPoint.Win.Spread.Model.CellRange[] cr;
    cr = fpSpread1.ActiveSheet.GetSelections();
    label1.Text = "The selection covers cells " + cr[0].Row + ", " + cr[0].Column + ", " + cr[0].RowCount + ", " + cr[0].ColumnCount;
}
Dim dlg As DialogResult
FpSpread1.ActiveSheet.SelectionPolicy = FarPoint.Win.Spread.Model.SelectionPolicy.MultiRange
FpSpread1.ActiveSheet.AddSelection(0, 0, 2, 2)
FpSpread1.ActiveSheet.AddSelection(0, 3, 2, 2)
dlg = MessageBox.Show("Do you want to get one of the selections?", "GetSelection", MessageBoxButtons.YesNo)
If dlg = DialogResult.Yes Then
    Dim cr() As FarPoint.Win.Spread.Model.CellRange
    cr = FpSpread1.ActiveSheet.GetSelections()
    Label1.Text = "The  first selection covers cells " & cr(0).Row & ", " & cr(0).Column & ", " & cr(0).RowCount & ", " &
cr(0).ColumnCount
End If
参照

SheetView クラス
SheetView メンバ
GetSelection メソッド

開発者ガイド

選択領域の処理

 

 


© MESCIUS inc. All rights reserved.