ナレッジベース

SPREAD for .NET 3.0J Windows Forms Edition

動作保証環境と同様
※2008年5月30日版（3.0.2008.2005）以前では発生しません

マルチカラムコンボボックス型セルで表示されるドロップダウンリストの自動フィルタリングを有効にしてもフィルタ項目が表示されません。

【再現コード】
　　Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

　　　　' マルチカラムコンボボックス型の設定
　　　　Dim DT As New DataTable
　　　　DT.Columns.Add("Code")
　　　　DT.Columns.Add("Text")
　　　　DT.Rows.Add(New Object() {10, "Text10"})
　　　　DT.Rows.Add(New Object() {20, "Text20"})
　　　　DT.Rows.Add(New Object() {30, "Text30"})
　　　　Dim mcb As New FarPoint.Win.Spread.CellType.MultiColumnComboBoxCellType()
　　　　mcb.DataSourceList = DT
　　　　mcb.ListWidth = 300
　　　　FpSpread1.ActiveSheet.Cells(1, 1).CellType = mcb

　　End Sub

　　Private Sub FpSpread1_EditModeOn(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FpSpread1.EditModeOn

　　　　'アクティブセルのインデックスを取得します
　　　　Dim iRow As Integer = FpSpread1.ActiveSheet.ActiveRowIndex
　　　　Dim iCol As Integer = FpSpread1.ActiveSheet.ActiveColumnIndex

　　　　'アクティブセルのセル型を判断します
　　　　If TypeOf (FpSpread1.ActiveSheet.GetCellType(iRow, iCol)) Is FarPoint.Win.Spread.CellType.MultiColumnComboBoxCellType Then
　　　　　　Dim cmbSpread As FarPoint.Win.Spread.FpSpread = CType(FpSpread1.EditingControl, FarPoint.Win.Spread.CellType.GeneralEditor).SubEditor
　　　　　　cmbSpread.ActiveSheet.Columns(0).AllowAutoFilter = True
　　　　End If

　　End Sub

現在のところ回避方法はありません