• ベストアンサー

フィルタ後のフォームの件数の取得の仕方

あくせすです。 テーブルを元にフォームにデータを表示させているのですが 元データのテーブルのレコード数が100件だとして 今フォーム上で手作業でフィルタをかけて表示しているレコード数が20件だとしたら、 この20件と言う数をVBAで取得する方法を教えてください。 DCountだと、元テーブルの全てのレコード数(フィルタ前)が取得されてしまいます。

質問者が選んだベストアンサー

  • ベストアンサー
  • nicotinism
  • ベストアンサー率70% (1019/1452)
回答No.2

前略 ・・・ Me.Filteron = true msgbox me.recordcount では? フォーム上に表示なら、 テキストボックスのコントロールソースに =count(*) にて。

pvhbcgoysxb
質問者

お礼

ありがとうございます。

その他の回答 (2)

  • m3_maki
  • ベストアンサー率64% (296/460)
回答No.3

Debug.Print Forms("フォーム名").RecordsetClone.RecordCount とか?

pvhbcgoysxb
質問者

お礼

ありがとうございます。

  • bin-chan
  • ベストアンサー率33% (1403/4213)
回答No.1

DCountにはWhere条件を書けます。 フィルタ条件を渡して下さい。

pvhbcgoysxb
質問者

お礼

ありがとうございます。

関連するQ&A