FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread.Model 名前空間 > IExpressionSupport2 インタフェース : ParseFormula メソッド |
'Declaration Function ParseFormula( _ ByVal row As Integer, _ ByVal column As Integer, _ ByVal value As String _ ) As Expression
'使用法 Dim instance As IExpressionSupport2 Dim row As Integer Dim column As Integer Dim value As String Dim value As Expression value = instance.ParseFormula(row, column, value)
例外 | 説明 |
---|---|
ParseException | 値が有効な数式ではありません。 |
FarPoint.Win.Spread.Model.IExpressionSupport ems; ems = (FarPoint.Win.Spread.Model.IExpressionSupport)fpSpread1.ActiveSheet.Models.Data; fpSpread1.ActiveSheet.SetValue(0, 0, 5); fpSpread1.ActiveSheet.SetValue(1, 0, 5); ems.SetFormula(2, 0, "SUM(A1, A2)"); string s; s = ems.GetFormula(2, 0); FarPoint.CalcEngine.Expression exp; FarPoint.Win.Spread.Model.IExpressionSupport2 es; es = (FarPoint.Win.Spread.Model.IExpressionSupport2)fpSpread1.ActiveSheet.Models.Data; exp = es.ParseFormula(2, 0, s); MessageBox.Show("The parsed formula is " + exp.ToString());
Dim ems As FarPoint.Win.Spread.Model.IExpressionSupport ems = FpSpread1.ActiveSheet.Models.Data FpSpread1.ActiveSheet.SetValue(0, 0, 5) FpSpread1.ActiveSheet.SetValue(1, 0, 5) ems.SetFormula(2, 0, "SUM(A1, A2)") Dim s As String s = ems.GetFormula(2, 0) Dim exp As FarPoint.CalcEngine.Expression Dim es As FarPoint.Win.Spread.Model.IExpressionSupport2 es = FpSpread1.ActiveSheet.Models.Data exp = es.ParseFormula(2, 0, s) MessageBox.Show("The parsed formula is " & exp.ToString())