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();