- ベストアンサー
DCount 0が返ります。
アクセスvbaで テーブルで該当の文字を抽出後のレコードの数を取得するしたいのですが 数 = DCount("[番号]", "T全て", "[分類] = '" & str分類 & "'") 数 = DCount("*", "T全て", "[分類] = '" & str分類 & "'") どちらも0が返ります。 str分類には、分類フィールドに必ず存在する文字列が入っています。 手作業でテーブルにフィルタをすると ちゃんとレコード数が見えるのですが DCountの何が間違ってるのでしょうか？
- weltpzltp
- お礼率100% (49/49)
- その他MS Office製品
- 回答数2
- ありがとう数3
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
あるハズなのに０が返って来る時の str分類 の値、 ヒットするハズのフィールドの値 の具体例をどうぞ。 = 演算子（完全一致）ではなく Like 演算子を使えば良さげかも？
その他の回答 (1)
- 山田 太郎（@f_a_007）
- ベストアンサー率20% (955/4574)
Q、DCountの何が間違ってるのでしょうか？ A、変数<str分類>の値が適切に設定されていない。 × 数 = DCount("*", "T全て", "[分類] = '" & str分類 & "'") ○ MsgBox DCount("*", "T全て", "分類='xxxxx'") & ":" & str分類 でテストあるのみ。
お礼
ご回答ありがとうございました。
関連するQ&A
- DCount 型が一致しません。(Error13)
アクセスＶＢＡです。 テーブルで 2016年から始まるレコードの数を数えようと Debug.Print DCount([フォルダ名], "フォルダ名", "[フォルダ名] = '2016年*'") としたのですが、 型が一致しません。(Error13) になります。 レコードに該当文字が含むレコード数を取得するの方法を教えてください。
- ベストアンサー
- オフィス系ソフト
- DCountはそんなに負荷がかかるのでしょうか？
アクセス２０１０です。 テーブルは１００００レコードあり そのレコードをＶＢＡでループしているのですが そのループの中にDCountで数を取得するコードを入れると 凄く動きが遅くなります。 フリーズして応答なしになります。 DCountはそんなに負荷がかかるのでしょうか？
- ベストアンサー
- オフィス系ソフト
- フィルタ後のテーブルのレコード数を取得したい
アクセスｖｂａです。 フィルタ後のテーブルのレコード数を取得したいのですが Debug.Print DCount("[フィールド１]", "テーブル1") だと、フィルタ前の数が取得されてしまいます。 フォーム1にテーブル1を紐付けて、 更にフィルタをしているのですが、 元のテーブル１のレコード数が10として、 フィルタ後が3なら、3を取得するVBAコードを教えてください。
- ベストアンサー
- オフィス系ソフト
- DCountでテーブルのレコード件数を取得するには
アクセスのテーブル1に何件レコードがあるかをvbaのDCountで取得したいのですが Sub a() MsgBox DCount("テーブル1") End Sub すると、引数は省略できません。(Error 449)になります。 フィールドは件数あり、レコードが入ってたり入ってなかったりするし、主キーはありません。 アクションクエリの削除クエリですべてのレコードを削除したりするので レコード件数が0件なのか、レコードがはいってるかをDCountで取得できればなー と思うのですが、どうすればいいでしょうか？
- ベストアンサー
- オフィス系ソフト
- Access2000 Dcountの使い方
レコードソースはフォームのOpenイベント時に設定してる非連結レポートです。 レポートフッターでの集計を行いたいのですが、まず、1)Dcountでいいのかどうか、2)Dcountの使い方、をおしえてください。 【実現したいこと】レコードソースのフィールドには1～5の数値がランダムに入っている。レポートのフッターにテキストボックスを5個追加して、それぞれにそのフィールドのレコードセット全体での5の数、4の数・・・、を表示したい。 AccessのヘルプでDcountを調べたのですが、引数の意味がまったく？？？なのです。よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- フィルタ後のフォームの件数の取得の仕方
あくせすです。 テーブルを元にフォームにデータを表示させているのですが 元データのテーブルのレコード数が１００件だとして 今フォーム上で手作業でフィルタをかけて表示しているレコード数が２０件だとしたら、 この２０件と言う数をＶＢＡで取得する方法を教えてください。 DCountだと、元テーブルの全てのレコード数（フィルタ前）が取得されてしまいます。
- ベストアンサー
- オフィス系ソフト
- アクセス2007 ＶＢＡで抽出の一部解除
超初心者ですが、よろしくお願いします。 アクセスのVBA で２つのフィールド（文字列）にフィルタをかけて抽出するようにしています。その際、１つのフィールドのフィルタのみを外したいのですがうまくいきません。ワイルドカード％を代入するとフィルタすべてが効かなくなってしまいます。また、" "を代入すると何も表示されません。どのようにしたらうまくいくのでしょうか。ご教示よろしくお願いします。
- 締切済み
- オフィス系ソフト
- adoのWHERE句 クエリだとフィルタされない
エクセルvbaなのですが、 adoのWHERE句は、テーブルじゃないとダメなのでしょうか？ と言うのも、 rs.Open "Q_カテゴリ WHERE 分類 like '%A%'" だと、エラーにならないのですが、抽出もされずに全レコードが対象になってしまいます。 しかし、 rs.Open "T_カテゴリ WHERE 分類 like '%A%'" にすれば、抽出された後のレコード数が取得されます。 エラーにならない事から、オブジェクトは存在してる事は確かなはずですが なぜかフィルタできません。 なぜでしょうか？
- ベストアンサー
- Visual Basic
- レコードの文字列をフィールド抽出のクエリとして指定
レコードの文字列として リンゴ ミカン イチゴ となっていたときに、この3つを別のテーブルにあるフィールド名のリンゴ、ミカン、イチゴのみを抽出するクエリをVBAで指定できますか？
- 締切済み
- MySQL
- Dcountの条件文について（ACCESSのレポート機能）
日報レポートを作成中ですが、テーブル内の複数のフィードを指定して、絞込抽出して、該当のレコード数を返したいのですが、エラーが表示されてうまくいきません。エラーが表示されるのは、レポート上の該当のレコード数を表示させるテキストボックスです。 テキストボックスのコントロールソースには以下のような記述をしています。 =DCount("[ステータス]+[シート有無]","[抽出クエリ]","[ステータス]='受注' Or [ステータス]='失注' Or [ステータス]='検討中'" And "[シート有無]=Yes") コントロールソース上での記載ではエラーは出ませんが、レポートを実行させると、テキストボックス上にエラーが出てしまいます。 Webでいろいろ調べて見ましたが、原因がどうしても分かりません。 どなたかサポートしていただければ幸いです。
- ベストアンサー
- その他(データベース)
お礼
ご回答ありがとうございました。