数値型セルでActiveX版と四捨五入の結果が異なる – MESCIUS ナレッジベース

作成日: 2019/07/25 最終更新日: 2019/07/25

文書種別

使用方法

詳細

ActiveX版のSPREADでは“5”を四捨五入する場合に、その結果が偶数になるようにする方法が採用されていました。
しかし、.NET版のSPREADでは、.NET Frameworkの機能をそのまま使用しており、単純に四捨五入する方法に変更されています。

ActiveX版と同じ方法で四捨五入するには、NumberCellType型セルに代えてInputManCellのGcNumberCellType型セルをご利用いただく方法がございます。

◎サンプルコード(VB)

Public Class Form1
　　Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
　　　　' NumberCellType型セルの設定
　　　　Dim numberCell1 As New FarPoint.Win.Spread.CellType.NumberCellType()
　　　　numberCell1.DecimalPlaces = 2
　　　　FpSpread1.ActiveSheet.Columns(0).CellType = numberCell1

　　　　' GcNumberCellType型セルの設定
　　　　Dim numberCell2 As New GrapeCity.Win.Spread.InputMan.CellType.GcNumberCellType()
　　　　numberCell2.Fields.SetFields("##0.00,,,-,")
　　　　numberCell2.DisplayFields.Clear()
　　　　numberCell2.DisplayFields.AddRange("##0.00,,,-,")
　　　　numberCell2.SideButtons.Clear()
　　　　numberCell2.RoundPattern = GrapeCity.Win.Spread.InputMan.CellType.RoundPattern.MidpointRoundToEven
　　　　FpSpread1.ActiveSheet.Columns(1).CellType = numberCell2

　　　　' 値の設定
　　　　FpSpread1.ActiveSheet.SetValue(0, 0, 0.145)
　　　　FpSpread1.ActiveSheet.SetValue(0, 1, 0.145)
　　　　FpSpread1.ActiveSheet.SetValue(1, 0, 0.135)
　　　　FpSpread1.ActiveSheet.SetValue(1, 1, 0.135)
　　End Sub
End Class

◎サンプルコード(C#)

private void Form1_Load(object sender, EventArgs e)
{
　　// Number型セルの設定
　　FarPoint.Win.Spread.CellType.NumberCellType numberCell1 = new FarPoint.Win.Spread.CellType.NumberCellType();
　　numberCell1.DecimalPlaces = 2;
　　fpSpread1.ActiveSheet.Columns[0].CellType = numberCell1;

　　// GcNumberCellType型セルの設定
　　GrapeCity.Win.Spread.InputMan.CellType.GcNumberCellType numberCell2 = new GrapeCity.Win.Spread.InputMan.CellType.GcNumberCellType();
　　numberCell2.Fields.SetFields("##0.00,,,-,");
　　numberCell2.DisplayFields.Clear();
　　numberCell2.DisplayFields.AddRange("##0.00,,,-,");
　　numberCell2.SideButtons.Clear();
　　numberCell2.RoundPattern = GrapeCity.Win.Spread.InputMan.CellType.RoundPattern.MidpointRoundToEven;
　　fpSpread1.ActiveSheet.Columns[1].CellType = numberCell2;

　　// 値の設定
　　fpSpread1.ActiveSheet.SetValue(0, 0, 0.145);
　　fpSpread1.ActiveSheet.SetValue(0, 1, 0.145);
　　fpSpread1.ActiveSheet.SetValue(1, 0, 0.135);
　　fpSpread1.ActiveSheet.SetValue(1, 1, 0.135);
}

旧文書番号

84316