作成日: 2018/05/11 最終更新日: 2018/05/11
文書種別
不具合
状況
修正済み
詳細
ソートした状態でドラッグフィル（オートフィル）を行うと以下のような例外が発生します。
============================================
System.Exception: FpSpread.WndProcメソッドで例外が発生しました
---> System.ArgumentException: 有効な OleAut 日付ではありません。
============================================
■再現用サンプルコード（VB.NET）
■再現手順
1. ２列目でソートします。
2. "A1"セルに任意の日付を入力します。
3. 入力したセルを選択し、ドラッグフィル（オートフィル）を行います。
============================================
System.Exception: FpSpread.WndProcメソッドで例外が発生しました
---> System.ArgumentException: 有効な OleAut 日付ではありません。
============================================
■再現用サンプルコード（VB.NET）
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' １列目を日付型セルに設定します。
Dim dateCell As New FarPoint.Win.Spread.CellType.DateTimeCellType()
dateCell.DateTimeFormat = FarPoint.Win.Spread.CellType.DateTimeFormat.UserDefined
dateCell.UserDefinedFormat = "yyyy/MM/dd"
FpSpread1.ActiveSheet.Columns(0).CellType = dateCell
FpSpread1.ActiveSheet.Columns(0).Width = 80
' ２列目のソートを有効にします。
FpSpread1.ActiveSheet.Columns(1).AllowAutoSort = True
' ドラッグフィル（オートフィル）機能を有効にします。
FpSpread1.AllowDragFill = True
' ２列目のセルに値を設定します。
Dim data As Object() = New Object() {9, 7, 6, 4, 2, 3, 5, 8, 1}
For i As Integer = 0 To data.Length - 1
FpSpread1.ActiveSheet.SetValue(i, 1, data(i))
Next
End Sub
' １列目を日付型セルに設定します。
Dim dateCell As New FarPoint.Win.Spread.CellType.DateTimeCellType()
dateCell.DateTimeFormat = FarPoint.Win.Spread.CellType.DateTimeFormat.UserDefined
dateCell.UserDefinedFormat = "yyyy/MM/dd"
FpSpread1.ActiveSheet.Columns(0).CellType = dateCell
FpSpread1.ActiveSheet.Columns(0).Width = 80
' ２列目のソートを有効にします。
FpSpread1.ActiveSheet.Columns(1).AllowAutoSort = True
' ドラッグフィル（オートフィル）機能を有効にします。
FpSpread1.AllowDragFill = True
' ２列目のセルに値を設定します。
Dim data As Object() = New Object() {9, 7, 6, 4, 2, 3, 5, 8, 1}
For i As Integer = 0 To data.Length - 1
FpSpread1.ActiveSheet.SetValue(i, 1, data(i))
Next
End Sub
■再現手順
1. ２列目でソートします。
2. "A1"セルに任意の日付を入力します。
3. 入力したセルを選択し、ドラッグフィル（オートフィル）を行います。
回避方法
Service Pack 1（v11.0.4502.2012）で修正済み。
旧文書番号
41788