MESCIUS SPREAD for Windows Forms 17.0J サンプルコード集
ドロップダウンリスト内の文字列を変更する

自動的に表示されるフィルタリング条件の文字列("(All)", "(Blanks)", "(NonBlanks)")を自由に変更することができます。

※このサンプルはシートのAutoFilterModeがFilterGadgetに設定されている場合のみ有効です。

【実行例】 デフォルト

デフォルト

【実行例】 変更イメージ

変更イメージ

  • 表示色等を変更することはできません。
  • シート上にてフィルタリングされた行は一時的に非表示となるだけで、実際のデータには影響を与えません。そのため、Excelファイルへのエクスポート時には全ての行情報が出力されます。

 private void Form1_Load(object sender, System.EventArgs e)
 {

  // 自動フィルタリング機能を有効にします
  fpSpread1.ActiveSheet.Columns[0].AllowAutoFilter = true;
  // 自動フィルタのフィルタガジェットを表示します
  fpSpread1.ActiveSheet.AutoFilterMode = FarPoint.Win.Spread.AutoFilterMode.FilterGadget;

  // フィルタリング文字列を変更します
  fpSpread1.ActiveSheet.RowFilter.AllString = "全て";
  fpSpread1.ActiveSheet.RowFilter.BlanksString = "空白";
  fpSpread1.ActiveSheet.RowFilter.NonBlanksString = "入力済み";

  fpSpread1.ActiveSheet.Cells[0, 0].Value = "North";
  fpSpread1.ActiveSheet.Cells[1, 0].Value = "South";
  fpSpread1.ActiveSheet.Cells[2, 0].Value = "East";
  fpSpread1.ActiveSheet.Cells[3, 0].Value = "South";
  fpSpread1.ActiveSheet.Cells[4, 0].Value = "North";
  fpSpread1.ActiveSheet.Cells[5, 0].Value = "North";
  fpSpread1.ActiveSheet.Cells[6, 0].Value = "West";
  fpSpread1.ActiveSheet.Columns[0].Width = 80;

 }
 Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load

  ' 自動フィルタリング機能を有効にします
  FpSpread1.ActiveSheet.Columns(0).AllowAutoFilter = True
  ' 自動フィルタのフィルタガジェットを表示します
  FpSpread1.ActiveSheet.AutoFilterMode = FarPoint.Win.Spread.AutoFilterMode.FilterGadget

  ' フィルタリング文字列を変更します
  FpSpread1.ActiveSheet.RowFilter.AllString = "全て"
  FpSpread1.ActiveSheet.RowFilter.BlanksString = "空白"
  FpSpread1.ActiveSheet.RowFilter.NonBlanksString = "入力済み"

  FpSpread1.ActiveSheet.Cells(0, 0).Value = "North"
  FpSpread1.ActiveSheet.Cells(1, 0).Value = "South"
  FpSpread1.ActiveSheet.Cells(2, 0).Value = "East"
  FpSpread1.ActiveSheet.Cells(3, 0).Value = "South"
  FpSpread1.ActiveSheet.Cells(4, 0).Value = "North"
  FpSpread1.ActiveSheet.Cells(5, 0).Value = "North"
  FpSpread1.ActiveSheet.Cells(6, 0).Value = "West"
  FpSpread1.ActiveSheet.Columns(0).Width = 80

 End Sub

 

 


© MESCIUS inc. All rights reserved.