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も見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
ADOを使ったDBアクセス後のメモリ解放
その他(データベース)
-
アクセスのfilter、複数条件の記述方法を教えてください。
Access(アクセス)
-
アクセス ADO Null以外のレコードの件数を取得したい
Access(アクセス)
-
-
4
[VBA] ADOの Clone と AddNew
その他(プログラミング・Web制作)
-
5
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
6
YES/NO型の値
Excel(エクセル)
-
7
カレントレコードが無い事を判定させる方法
Visual Basic(VBA)
-
8
ado フィルタで 含まない とするには?
Excel(エクセル)
-
9
レコードが存在しなかった場合
Microsoft ASP
-
10
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
11
Accessでレコードを別テーブルへコピーするには
Access(アクセス)
-
12
DAOのrs.Filter =の使い方
PowerPoint(パワーポイント)
-
13
フォームを開くときに、コンボボックスの値を選択(アクセスVBA)
Visual Basic(VBA)
-
14
Accessのテーブルデータを一気にVBAで追加したい・・
その他(データベース)
-
15
実行時エラー3001「引数が間違った型、許容範囲外、または競合しています。」
Visual Basic(VBA)
-
16
日付型のフィールドに空白を入れる方法を教えてください
その他(データベース)
-
17
Access200のFilterとFindの違い
その他(データベース)
-
18
MS Accessでフォームの「開く時」と「読込み時」のイベントの違い
Access(アクセス)
-
19
【ACCESS】フォーム名/コントロール名を文字列型変数で指定するには
Access(アクセス)
-
20
ADOでRecordsetオブジェクトをレコードソースに設定したい
その他(データベース)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
バックグラウンドのプロセスの...
-
C#でのbatファイル実行結果取得
-
別のプロセスの関数を呼び出す...
-
Visual C++からpingを実行して...
-
explorer.exeが異様にメモリを食う
-
タスクマネージャーのプロセス...
-
VBAで別プロセスのExcelのフル...
-
プロセスIDからウィンドウハ...
-
ADOでアクセスのレコードに...
-
API関数 GetExitCodeProcess
-
特定ユーザーのプロセス情報を...
-
EXE間でデータを受け渡し時のka...
-
ウィンドウのタイトルからプロ...
-
共有メモリの使い方について
-
GetModuleFileNameでエラーが出...
-
sleep関数の精度について
-
完全な乱数を生成する方法
-
VB.NET 自プログラムのプロセス...
-
execvpでのcdコマンドについて。
-
Linuxでのスレッド間メッセージ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
バックグラウンドのプロセスの...
-
explorer.exeが異様にメモリを食う
-
なぜ女性は男性が忘れたことを...
-
タスクマネージャーのプロセス...
-
プロセスのアタッチ・デタッチ...
-
非表示になったエクセルは?
-
Process.Startの戻り値を後で取得
-
C#でのbatファイル実行結果取得
-
プロセスIDからウィンドウハ...
-
c言語でプロセスIDを調べたい
-
Linuxでのスレッド間メッセージ...
-
プロセスIDの取得方法について
-
ADOでアクセスのレコードに...
-
怪しいプロセス教えてください。
-
vb.netでEXCEL起動がうまくでき...
-
別のプロセスの関数を呼び出す...
-
C++のプログラムをバックグラウ...
-
Visual C++からpingを実行して...
-
VBS(WSH)で開いたIEのウィンド...
-
IISがフリーズ
おすすめ情報