作成日: 2020/01/30 最終更新日: 2021/02/26
文書種別
不具合
状況
修正済み
詳細
ソートオプションを有効にした拡張フィルタを列に設定したシート上で、特定列のソートまたはフィルタリングを無効にすると、ユーザー設定の並べ替えダイアログ上で、ソート対象となる列名を設定するコンボボックスのアイテムが不足します。
【再現手順】
1.新規作成したプロジェクトのForm1にFpSpreadを貼り付ける
2.下記サンプルコードを記述する
3.実行し、E列のフィルタボタン→色で並べ替え→ユーザー設定の並び替え
4.並び替え画面で列をドロップダウンさせる
-------E列しか表示されません
■サンプルコード(VB.NET)
【再現手順】
1.新規作成したプロジェクトのForm1にFpSpreadを貼り付ける
2.下記サンプルコードを記述する
3.実行し、E列のフィルタボタン→色で並べ替え→ユーザー設定の並び替え
4.並び替え画面で列をドロップダウンさせる
-------E列しか表示されません
■サンプルコード(VB.NET)
Imports FarPoint.Win.Spread
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' バージョンの確認
Me.Text = FpSpread1.ProductVersion
' シートの初期設定
FpSpread1.ActiveSheet.AutoFilterMode = AutoFilterMode.EnhancedContextMenu
FpSpread1.ActiveSheet.AutoSortEnhancedContextMenu = True
FpSpread1.ActiveSheet.ColumnCount = 5
FpSpread1.ActiveSheet.Columns.Default.Width = 55
FpSpread1.ActiveSheet.Columns(3).Visible = False
'D列にソート・フィルタを設定しない
FpSpread1.ActiveSheet.Columns(0, 2).AllowAutoSort = True
FpSpread1.ActiveSheet.Columns(4).AllowAutoSort = True
FpSpread1.ActiveSheet.Columns(0, 2).AllowAutoFilter = True
FpSpread1.ActiveSheet.Columns(4).AllowAutoFilter = True
' 値の設定
For i As Integer = 0 To 9
For j As Integer = 0 To FpSpread1.ActiveSheet.ColumnCount - 1
FpSpread1.ActiveSheet.SetValue(i, j, $"R{i}C{j}")
Next
Next
End Sub
End Class
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' バージョンの確認
Me.Text = FpSpread1.ProductVersion
' シートの初期設定
FpSpread1.ActiveSheet.AutoFilterMode = AutoFilterMode.EnhancedContextMenu
FpSpread1.ActiveSheet.AutoSortEnhancedContextMenu = True
FpSpread1.ActiveSheet.ColumnCount = 5
FpSpread1.ActiveSheet.Columns.Default.Width = 55
FpSpread1.ActiveSheet.Columns(3).Visible = False
'D列にソート・フィルタを設定しない
FpSpread1.ActiveSheet.Columns(0, 2).AllowAutoSort = True
FpSpread1.ActiveSheet.Columns(4).AllowAutoSort = True
FpSpread1.ActiveSheet.Columns(0, 2).AllowAutoFilter = True
FpSpread1.ActiveSheet.Columns(4).AllowAutoFilter = True
' 値の設定
For i As Integer = 0 To 9
For j As Integer = 0 To FpSpread1.ActiveSheet.ColumnCount - 1
FpSpread1.ActiveSheet.SetValue(i, j, $"R{i}C{j}")
Next
Next
End Sub
End Class
回避方法
Service Pack 5(v10.0.4009.2012)で修正済み。
旧文書番号
84901