FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > FpSpread クラス : AllowUserFormulas プロパティ |
'Declaration Public Property AllowUserFormulas As Boolean
'使用法 Dim instance As FpSpread Dim value As Boolean instance.AllowUserFormulas = value value = instance.AllowUserFormulas
public bool AllowUserFormulas {get; set;}
このプロパティをtrueに設定すると、ユーザーは[=]キーを押すことで、セルに数式を入力したり、セルの数式を表示または変更したりできます。このプロパティがfalseに設定されていても、プログラムコードで(Cell、Row、またはColumnオブジェクトの)Formulaプロパティを使用してセルの数式を提供することは可能です。このプロパティは、ユーザーが数式を入力できないようにするだけです。
数式の詳細については、「関数リファレンス」を参照してください。
FarPoint.Win.Spread.FpSpread fpSpread1 = new FarPoint.Win.Spread.FpSpread(); FarPoint.Win.Spread.SheetView shv = new FarPoint.Win.Spread.SheetView(); DialogResult dlg; fpSpread1.Location = new Point(10, 10); fpSpread1.Height = 200; fpSpread1.Width = 400; Controls.Add(fpSpread1); fpSpread1.Sheets.Add(shv); fpSpread1.ActiveSheet.Cells[0, 0].CellType = new FarPoint.Win.Spread.CellType.NumberCellType(); fpSpread1.ActiveSheet.Cells[1, 0].CellType = new FarPoint.Win.Spread.CellType.NumberCellType(); fpSpread1.ActiveSheet.Cells[1, 2].CellType = new FarPoint.Win.Spread.CellType.NumberCellType(); fpSpread1.ActiveSheet.SetValue(0, 0, 20); fpSpread1.ActiveSheet.SetValue(1, 0, 20); dlg = MessageBox.Show("Without going into edit mode, type =SUM(A1,A2) in the second row of the third column.", "AllowUserFormulas", MessageBoxButtons.OKCancel); if (dlg == DialogResult.OK) { fpSpread1.AllowUserFormulas = true; }
Dim fpSpread1 As New FarPoint.Win.Spread.FpSpread() Dim shv As New FarPoint.Win.Spread.SheetView() Dim dlg As DialogResult fpSpread1.Location = New Point(10, 10) fpSpread1.Height = 200 fpSpread1.Width = 400 Controls.Add(fpSpread1) fpSpread1.Sheets.Add(shv) fpSpread1.ActiveSheet.Cells(0, 0).CellType = New FarPoint.Win.Spread.CellType.NumberCellType() fpSpread1.ActiveSheet.Cells(1, 0).CellType = New FarPoint.Win.Spread.CellType.NumberCellType() fpSpread1.ActiveSheet.Cells(1, 2).CellType = New FarPoint.Win.Spread.CellType.NumberCellType() fpSpread1.ActiveSheet.SetValue(0, 0, 20) fpSpread1.ActiveSheet.SetValue(1, 0, 20) dlg = MessageBox.Show("Without going into edit mode, type =SUM(A1,A2) in the second row of the third column.", "AllowUserFormulas", MessageBoxButtons.OKCancel) If dlg = DialogResult.OK Then fpSpread1.AllowUserFormulas = True End If