FarPoint.Win.Spread.Model.DefaultSheetDataModel dataModel = new FarPoint.Win.Spread.Model.DefaultSheetDataModel(5, 5);
dataModel.AddCustomName("TWICESUM", "2*SUM(A1,A2)", 1, 1);
dataModel.SetFormula(1, 1, "TWICESUM");
dataModel.SetValue(0, 0, 10);
dataModel.SetValue(1, 0, 10);
fpSpread1.ActiveSheet.Models.Data = dataModel;
listBox1.Items.Add(dataModel.GetCustomName("TWICESUM").ToString());
Dim dataModel As New FarPoint.Win.Spread.Model.DefaultSheetDataModel(10, 10)
dataModel.AddCustomName("TWICESUM", "2*SUM(A1,A2)", 1, 1)
dataModel.SetFormula(1, 1, "TWICESUM")
dataModel.SetValue(0, 0, 10)
dataModel.SetValue(1, 0, 10)
FpSpread1.ActiveSheet.Models.Data = dataModel
ListBox1.Items.Add(dataModel.GetCustomName("TWICESUM").ToString())