FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread.Model 名前空間 > DefaultSheetDataModel クラス : RecalculateAll メソッド |
'Declaration Public Sub RecalculateAll()
'使用法 Dim instance As DefaultSheetDataModel instance.RecalculateAll()
public void RecalculateAll()
Dim dataModel As New FarPoint.Win.Spread.Model.DefaultSheetDataModel(10, 10) Dim dlg As DialogResult FpSpread1.ActiveSheet.Models.Data = dataModel dataModel.SetValue(0, 0, 10) dataModel.SetValue(1, 0, 20) dataModel.SetFormula(1, 1, "3*SUM(A1, A2)") dataModel.SetValue(4, 0, 100) dataModel.SetValue(5, 0, 200) dataModel.SetFormula(2, 2, "3*SUM(A5, A6)") dlg = MessageBox.Show("Do you want to recalculate?", "RecalculateAll", MessageBoxButtons.YesNo) If dlg = DialogResult.Yes Then dataModel.SetValue(0, 0, 50) dataModel.RecalculateAll() End If
FarPoint.Win.Spread.Model.DefaultSheetDataModel dataModel = new FarPoint.Win.Spread.Model.DefaultSheetDataModel(8, 8); DialogResult dlg; fpSpread1.ActiveSheet.Models.Data = dataModel; dataModel.SetValue(0, 0, 10); dataModel.SetValue(1, 0, 20); dataModel.SetFormula(1, 1, "3*SUM(A1, A2)"); dataModel.SetValue(4, 0, 100); dataModel.SetValue(5, 0, 200); dataModel.SetFormula(2, 2, "3*SUM(A5, A6)"); dlg = MessageBox.Show("Do you want to recalculate?", "RecalculateAll", MessageBoxButtons.YesNo); if (dlg == DialogResult.Yes) { dataModel.SetValue(0, 0, 50); dataModel.RecalculateAll(); }