FarPoint.Win.Spread.Model.IEnhancedCustomNameSupport cns;
FarPoint.CalcEngine.Expression ex;
cns = (FarPoint.Win.Spread.Model.IEnhancedCustomNameSupport)fpSpread1.ActiveSheet.Models.Data;
cns.AddModelScopeCustomName("ALPHA", new FarPoint.CalcEngine.DoubleExpression(20), "test");
fpSpread1.ActiveSheet.SetFormula(1, 1, "ALPHA");
ex = cns.GetModelScopeCustomName("ALPHA");
listBox1.Items.Add("The type of the custom name is " + ex.ToString());
Dim cns As FarPoint.Win.Spread.Model.IEnhancedCustomNameSupport
Dim ex As FarPoint.CalcEngine.Expression
cns = FpSpread1.ActiveSheet.Models.Data
cns.AddModelScopeCustomName("ALPHA", New FarPoint.CalcEngine.DoubleExpression(20), "test")
FpSpread1.ActiveSheet.SetFormula(1, 1, "ALPHA")
ex = cns.GetModelScopeCustomName("ALPHA")
ListBox1.Items.Add("The type of the custom name is " & ex.ToString())