IntersectColumn Method

Visual Basic
C#

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

'Usage
 
Dim instance As CellRange
Dim column As Integer
Dim value As Boolean
 
value = instance.IntersectColumn(column)

public bool IntersectColumn( 
   int column
)

Parameters

column: Column index

Return Value

true if selected range intersects the specified column; false otherwise

This example creates a CellRange and uses it to set up a selection and a span in the spreadsheet. The several Intersect methods then query whether the selected range intersects the specified column and row and the result is returned to a list box.

C#

FarPoint.Web.Spread.Model.CellRange range=new FarPoint.Web.Spread.Model.CellRange(0,0,4,4);
FarPoint.Web.Spread.Model.BaseSheetSelectionModel model;
model=(FarPoint.Web.Spread.Model.BaseSheetSelectionModel)FpSpread1.ActiveSheetView.SelectionModel;
FpSpread1.ActiveSheetView.SelectionBackColor=Color.Yellow;
model.AddSelection(range.Row,range.Column,range.RowCount,range.ColumnCount);
bool b,b1,b2;
FpSpread1.ActiveSheetView.ColumnCount=10;
FpSpread1.ActiveSheetView.RowCount=10;
FpSpread1.ActiveSheetView.AddSpanCell(range.Row,range.Column,range.RowCount,range.ColumnCount);
b=range.IntersectColumn(1);
b1=range.IntersectRow(1);
b2=range.Intersects(0,0,4,4);
ListBox1.Items.Add(Convert.ToString(b));
ListBox1.Items.Add(Convert.ToString(b1));
ListBox1.Items.Add(Convert.ToString(b2));

Visual Basic

Dim range As New FarPoint.Web.Spread.Model.CellRange(1,1,4,4)
Dim range1 As New FarPoint.Web.Spread.Model.CellRange(0,0,4,4)
Dim model As FarPoint.Web.Spread.Model.BaseSheetSelectionModel
model=FpSpread1.ActiveSheetView.SelectionModel
FpSpread1.ActiveSheetView.SelectionBackColor=Color.Yellow
model.AddSelection(range.Row,range.Column,range.RowCount,range.ColumnCount)
Dim b,b1,b2AsBoolean
FpSpread1.ActiveSheetView.ColumnCount=10
FpSpread1.ActiveSheetView.RowCount=10
FpSpread1.ActiveSheetView.AddSpanCell(range.Row,range.Column,range.RowCount,range.ColumnCount)
b=range.IntersectColumn(1)
b1=range.IntersectRow(1)
b2=range.Intersects(0,0,4,4)
ListBox1.Items.Add(b)
ListBox1.Items.Add(b1)
ListBox1.Items.Add(b2)

Target Platforms: Windows 7, Windows 8, Windows Vista, Windows Server 2000, Windows 2000 Professional, Windows XP Professional, Windows NT 4.0 Workstation, SP6, Windows NT 4.0 Server, SP6

Reference

CellRange Class
CellRange Members