Spread Windows Forms 8.0 Product Documentation
ColumnRelative Property (CellExpression)
Example 


Determines whether the column coordinate is relative.
Syntax
'Declaration
 
Public Overrides ReadOnly Property ColumnRelative As Boolean
'Usage
 
Dim instance As CellExpression
Dim value As Boolean
 
value = instance.ColumnRelative
public override bool ColumnRelative {get;}

Property Value

true if relative reference for column; false if absolute reference
Example
This example returns some of the properties for the expression.
//Spread for Windows Forms
fpSpread1.ActiveSheet.AutoCalculation = false; 
fpSpread1.ActiveSheet.SetValue(1, 2, System.Convert.ToDouble("0.00")); 
fpSpread1.ActiveSheet.AddCustomName("Alpha", new FarPoint.CalcEngine.CellExpression(1, 2, false)); 
fpSpread1.ActiveSheet.SetFormula(2, 2, "IF(Alpha>0, 0.5, 0)"); 
fpSpread1.ActiveSheet.SetText(4, 2, "0.00"); 
fpSpread1.ActiveSheet.AddCustomName("Omega", new FarPoint.CalcEngine.CellExpression(2, 2, false, false)); 
fpSpread1.ActiveSheet.SetFormula(5, 2, "IF(Omega>0, 0.5, 0)"); 
fpSpread1.ActiveSheet.AutoCalculation = true; 
fpSpread1.ActiveSheet.RecalculateAll(); 
FarPoint.CalcEngine.Expression expr = fpSpread1.ActiveSheet.GetCustomName("Alpha"); 
if (expr is FarPoint.CalcEngine.CellExpression) 
{ 
FarPoint.CalcEngine.CellExpression cellExpr = ((FarPoint.CalcEngine.CellExpression)(expr)); 
MessageBox.Show("The expressions column reference is relative is " + cellExpr.ColumnRelative.ToString());
}
//Spread for Web Forms
FpSpread1.Sheets[0].AutoCalculation = false; 
FpSpread1.Sheets[0].SetValue(1, 2, System.Convert.ToDouble("0.00")); 
FarPoint.Web.Spread.Model.DefaultSheetDataModel dataModel = new FarPoint.Web.Spread.Model.DefaultSheetDataModel();  
dataModel = (FarPoint.Web.Spread.Model.DefaultSheetDataModel)FpSpread1.ActiveSheetView.DataModel; 
dataModel.AddCustomName("Alpha", new FarPoint.CalcEngine.CellExpression(1, 2, false, false)); 
FpSpread1.Sheets[0].SetFormula(2, 2, "IF(Alpha>0, 0.5, 0)"); 
FpSpread1.Sheets[0].SetText(4, 2, "0.00"); 
FarPoint.Web.Spread.Model.DefaultSheetDataModel dataModel1 = new FarPoint.Web.Spread.Model.DefaultSheetDataModel();  
dataModel1 = (FarPoint.Web.Spread.Model.DefaultSheetDataModel)FpSpread1.ActiveSheetView.DataModel;
dataModel1.AddCustomName("Omega", new FarPoint.CalcEngine.CellExpression(2, 2, false, false)); 
FpSpread1.Sheets[0].SetFormula(5, 2, "IF(Omega>0, 0.5, 0)"); 
FpSpread1.Sheets[0].AutoCalculation = true; 
FpSpread1.Sheets[0].RecalculateAll(); 
FarPoint.CalcEngine.Expression expr = dataModel.GetCustomName("Alpha"); 
if (expr is FarPoint.CalcEngine.CellExpression) 
{ 
FarPoint.CalcEngine.CellExpression cellExpr = ((FarPoint.CalcEngine.CellExpression)(expr)); 
TextBox1.Text = "The expressions column reference is relative is " + cellExpr.ColumnRelative.ToString(); 
}
'Spread for Windows Forms
FpSpread1.ActiveSheet.AutoCalculation = False
FpSpread1.ActiveSheet.SetValue(1, 2, CDbl("0.00"))
FpSpread1.ActiveSheet.AddCustomName("Alpha", New FarPoint.CalcEngine.CellExpression(1, 2, False, False))
FpSpread1.ActiveSheet.SetFormula(2, 2, "IF(Alpha>0, 0.5, 0)")
FpSpread1.ActiveSheet.SetText(4, 2, "0.00")
FpSpread1.ActiveSheet.AddCustomName("Omega", New FarPoint.CalcEngine.CellExpression(2, 2, False, False))
FpSpread1.ActiveSheet.SetFormula(5, 2, "IF(Omega>0, 0.5, 0)")
FpSpread1.ActiveSheet.AutoCalculation = True
FpSpread1.ActiveSheet.RecalculateAll()
Dim expr As FarPoint.CalcEngine.Expression = FpSpread1.ActiveSheet.GetCustomName("Alpha")
If TypeOf expr Is FarPoint.CalcEngine.CellExpression Then
Dim cellExpr As FarPoint.CalcEngine.CellExpression = CType(expr, FarPoint.CalcEngine.CellExpression)
MessageBox.Show("The expressions column reference is relative is " & cellExpr.ColumnRelative.ToString)
'Spread for Web Forms
FpSpread1.Sheets(0).Rows.Count = 5
FpSpread1.Sheets(0).Columns.Count = 5
FpSpread1.Sheets(0).AutoCalculation = False
FpSpread1.Sheets(0).SetValue(1, 2, CDbl("0.00"))
Dim dataModel As New FarPoint.Web.Spread.Model.DefaultSheetDataModel
dataModel = FpSpread1.ActiveSheetView.DataModel
dataModel.AddCustomName("Alpha", New FarPoint.CalcEngine.CellExpression(1, 2, False, False))
FpSpread1.Sheets(0).SetFormula(2, 2, "IF(Alpha>0, 0.5, 0)")
FpSpread1.Sheets(0).SetText(4, 2, "0.00")
Dim dataModel1 As New FarPoint.Web.Spread.Model.DefaultSheetDataModel
dataModel1 = FpSpread1.ActiveSheetView.DataModel
dataModel1.AddCustomName("Omega", New FarPoint.CalcEngine.CellExpression(2, 2, False, False))
FpSpread1.Sheets(0).SetFormula(5, 2, "IF(Omega>0, 0.5, 0)")
FpSpread1.Sheets(0).AutoCalculation = True
FpSpread1.Sheets(0).RecalculateAll()
Dim expr As FarPoint.CalcEngine.Expression = dataModel.GetCustomName("Alpha")
If TypeOf expr Is FarPoint.CalcEngine.CellExpression Then
Dim cellExpr As FarPoint.CalcEngine.CellExpression = CType(expr, FarPoint.CalcEngine.CellExpression)
TextBox1.Text = "The expressions column reference is relative is " & cellExpr.ColumnRelative.ToString()
 End If
Requirements

Target Platforms: Windows 2000 Professional (SP4), Windows 2000 Server, Windows 2003 Server (SP1), Windows 2008, Windows XP (SP2), Windows Vista, Windows 7, Windows 8

See Also

Reference

CellExpression Class
CellExpression Members

 

 


Copyright © GrapeCity, inc. All rights reserved.