FarPoint.Web.Spread.Model.BaseSheetSelectionModel bsm;
FarPoint.Web.Spread.Model.CellRange cr;
bsm = (FarPoint.Web.Spread.Model.BaseSheetSelectionModel)FpSpread1.ActiveSheetView.SelectionModel;
bsm.AddSelection(0, 0, 2, 2);
cr = bsm[0];
Response.Write("There are " + cr.ColumnCount + " columns in the selection.");
Dim bsm As FarPoint.Web.Spread.Model.BaseSheetSelectionModel
Dim cr As FarPoint.Web.Spread.Model.CellRange
bsm = FpSpread1.ActiveSheetView.SelectionModel
bsm.AddSelection(0, 0, 2, 2)
cr = bsm.Item(0)
Response.Write("There are " & cr.ColumnCount & " columns in the selection.")