FarPoint.Win.Spread.Model.CellRange cr = new FarPoint.Win.Spread.Model.CellRange(0, 0, 3, 3); 
FarPoint.Win.Spread.Model.CellRange range = new FarPoint.Win.Spread.Model.CellRange(1, 1, 2, 2); 
bool b; 
b = cr.Contains(range); 
if (b == true) 
{ 
      fpSpread1.ActiveSheet.Cells(cr.Row, cr.Column, cr.RowCount - 1, cr.ColumnCount - 1).BackColor = Color.Yellow; 
}
	 
	
		Dim cr As New FarPoint.Win.Spread.Model.CellRange(0, 0, 3, 3) 
Dim range As New FarPoint.Win.Spread.Model.CellRange(1, 1, 2, 2) 
Dim b As Boolean 
b = cr.Contains(range) 
If b = True Then 
 FpSpread1.ActiveSheet.Cells(cr.Row,cr.Column, cr.RowCount - 1, cr.ColumnCount - 1).BackColor = Color.Yellow 
End If