dataModel = FpSpread1.ActiveSheetView.DataModel;
dataModel.AddCustomName("TWICESUM", "2*SUM(A1,A2)", 1, 1);
dataModel.AddCustomName("TWICEPRODUCT", "2*A1*A2", 2, 2);
FpSpread1.ActiveSheetView.SetFormula(1, 1, "TWICESUM");
FpSpread1.ActiveSheetView.SetFormula(2, 2, "TWICEPRODUCT");
FpSpread1.ActiveSheetView.SetValue(0, 0, 10);
FpSpread1.ActiveSheetView.SetValue(1, 0, 10);
dataModel.SetTag(2, 2, "TWICEPRODUCT");
dataModel.RemoveCustomName("TWICESUM")
dataModel.Recalculate();
Dim dataModel As New FarPoint.Web.Spread.Model.DefaultSheetDataModel
dataModel = (FarPoint.Web.Spread.Model.DefaultSheetDataModel)FpSpread1.ActiveSheetView.DataModel
dataModel.AddCustomName("TWICESUM", "2*SUM(A1,A2)", 1, 1)
dataModel.AddCustomName("TWICEPRODUCT", "2*A1*A2", 2, 2)
FpSpread1.ActiveSheetView.SetFormula(1, 1, "TWICESUM")
FpSpread1.ActiveSheetView.SetFormula(2, 2, "TWICEPRODUCT")
FpSpread1.ActiveSheetView.SetValue(0, 0, 10)
FpSpread1.ActiveSheetView.SetValue(1, 0, 10)
dataModel.SetTag(2, 2, "TWICEPRODUCT")
dataModel.RemoveCustomName("TWICESUM")
dataModel.Recalculate();