![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
Sub ADO()
Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & アクセスファイル名
Set rs = New ADODB.Recordset
rs.Open "テーブル1", cn, adOpenKeyset, adLockOptimistic
rs.Filter = ("フィールド1 = " & "'" & 変数1 & "'")
rs.Filter = ("フィールド2 = " & "'" & 変数2 & "'")
Debug.Print rs.RecordCount
Set rs = Nothing
Set cn = Nothing
End Sub
だと最終的にはフィールド2のフィルタ後の個数しか取得できません。
rs.Filter = ("案件CD = " & "'" & 案件CD & "'" And "プロセス = " & "'" & プロセス & "'")
だと「型が一致しません」になります。
どうすれば変数1と変数2のフィルタ後のレコードの個数を取得できるのでしょうか?
ご教授よろしくお願い致します。
No.2ベストアンサー
- 回答日時:
> "案件CD = " & "'" & 案件CD & "'" And "プロセス = " & "'" & プロセス & "'"
とりあえず、現状では条件式(より正確には「And」の入れ方)に問題があります。
(この「And」は、ダブルクォート内にある必要があるのに、外に出てしまっている)
案件CDが文字列型なのでしたら、
"案件CD = '" & 案件CD & "' And プロセス = '" & プロセス & "'"
(シングルクォート「'」やAnd演算子などは、前後の文字列の中に入れました)
また案件CDが数値型の場合も念のために書くと、
"案件CD = " & 案件CD & " And プロセス = '" & プロセス & "'"
といった形にしてみてください。
No.1
- 回答日時:
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) access count数を変数に格納 2 2022/03/30 19:21
- Visual Basic(VBA) データベースから絞り込んでデータを読み込み 1 2023/02/21 19:51
- Access(アクセス) チェックボックスにチェックが入った後の挙動 1 2022/08/21 12:39
- Visual Basic(VBA) ExcelからAccessのテーブルに書き込む時に時間がかかる 1 2022/10/14 20:38
- Access(アクセス) access,vbaでフォルダ内のファイルをテーブルにインポート、ファイル名もフィールドに追加したい 1 2022/08/31 11:11
- Access(アクセス) DoCmd.SearchForRecord が動かない時の解決方法 3 2022/07/22 15:31
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- Access(アクセス) 実行時エラー3131 FROM 句の構文エラーです について 7 2022/06/13 15:45
- Access(アクセス) Access VBA を利用して、フォルダ内のファイルの名称を変更したい 1 2023/08/03 08:27
- Visual Basic(VBA) エクセルのマクロについて教えてください。 3 2023/07/07 08:37
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
ado フィルタで 含まない とするには?
Excel(エクセル)
-
実行時エラー3001「引数が間違った型、許容範囲外、または競合しています。」
Visual Basic(VBA)
-
ADOを使ったDBアクセス後のメモリ解放
その他(データベース)
-
-
4
YES/NO型の値
Excel(エクセル)
-
5
FindFirst を複数条件で検索
Visual Basic(VBA)
-
6
アクセス ADO Null以外のレコードの件数を取得したい
Access(アクセス)
-
7
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
8
[VBA] ADOの Clone と AddNew
その他(プログラミング・Web制作)
-
9
Accessでレコードを別テーブルへコピーするには
Access(アクセス)
-
10
Access サブフォームでの選択行の取得
その他(データベース)
-
11
DAOのrs.Filter =の使い方
PowerPoint(パワーポイント)
-
12
Accessを開くと「排他モードじゃないので変更しても保存できない」との旨の表示が出てしまう。
Access(アクセス)
-
13
Accessのテーブルデータを一気にVBAで追加したい・・
その他(データベース)
-
14
レコードが存在しなかった場合
Microsoft ASP
-
15
アクセスのfilter、複数条件の記述方法を教えてください。
Access(アクセス)
-
16
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
17
カレントレコードが無い事を判定させる方法
Visual Basic(VBA)
-
18
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
19
アクセス VBAについて FROM句の構文エラー
Access(アクセス)
-
20
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
他のアプリケーションをクリッ...
-
プロセスIDからウィンドウハ...
-
怪しいプロセス教えてください。
-
explorer.exeが異様にメモリを食う
-
C#でのbatファイル実行結果取得
-
子プロセスのデバッグ方法について
-
シェルで親プロセス終了時に子...
-
Process.Startの戻り値を後で取得
-
バックグラウンドのプロセスの...
-
逆コンパイルと逆アセンブルの...
-
Macターミナルで実行中のプログ...
-
USJでの割り込み
-
緯度、経度の 10進法と 60進法...
-
3のつく数字と3の倍数のみを表...
-
プログラミングの問題です。写...
-
【プログラミングScratch】で音...
-
F-BASICからC言語への変換
-
OpenCvsharpについて。
-
PCからシリアル通信で外部ハー...
-
メモリが不足しています(VBA)
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
バックグラウンドのプロセスの...
-
explorer.exeが異様にメモリを食う
-
タスクマネージャーのプロセス...
-
プロセスのアタッチ・デタッチ...
-
C#でのbatファイル実行結果取得
-
VB6.0 SHELLで起動...
-
ADOでアクセスのレコードに...
-
Windowsでのfork方法
-
非表示になったエクセルは?
-
共有メモリの同時アクセスにつ...
-
プロセスIDからウィンドウハ...
-
プロセスIDの取得方法について
-
C++のプログラムをバックグラウ...
-
C++でシェルを起動
-
Linuxでのスレッド間メッセージ...
-
OSPFでプロセスを分ける意義に...
-
怪しいプロセス教えてください。
-
Process.Startの戻り値を後で取得
-
SendMessageが失敗するときがある
-
ウィンドウのタイトルからプロ...
おすすめ情報