[過去ﾛｸﾞ] スレ立てるまでもない質問はここで 163匹目 (1002ﾚｽ)

スレ立てるまでもない質問はここで 163匹目 http://mevius.5ch.net/test/read.cgi/tech/1670470167/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 ﾚｽ栞

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

263: デフォルトの名無しさん (ﾜｯﾁｮｲ 9a01-+uJR) [sage] 2023/01/02(月) 16:44:54.81 ID:1k7qyNCA0 >>261 よく分からんけどfor文で条件式組み立てるだけじゃないの？ Dim C As Scripting.Dictionary C.Add "フィールド1", "A1" C.Add "フィールド2", "B1" C.Add "フィールド3", "C1" ... Dim W As String W = "1 = 1" Dim F As Variant For Each F In C.Keys W = W & " AND [" & F & "] = '" & C(F) "'" Next Set rs = CurrentDb.OpenRecordset("SELECT * FROM [Tテーブル] WHERE " & W, dbOpenDynaset) http://mevius.5ch.net/test/read.cgi/tech/1670470167/263

264: デフォルトの名無しさん (ﾜｯﾁｮｲ 8abd-/EFQ) [sage] 2023/01/02(月) 17:12:54.49 ID:1wsplgZl0 >>262 ありがとうございます。 Filterっていうのがあるんですね。 なんかうまく使えそうな気がするので使ってみます。 （なぜかCurrentDb.OpenRecordsetだとうまく機能しなかったのですが、ADODB.Recordsetにしたらうまくできました。） >>263 既に複雑なループや条件判定の状況だと複雑化しそうで、、、 （コーディングうまい人だと、うまく扱えるのだとは思うのですが） ただ、これはこれで勉強になりました。（またFilterでうまくコード組めなかったときには使わせて頂くかもです） ありがとうございました。 http://mevius.5ch.net/test/read.cgi/tech/1670470167/264

---

ﾒﾓ帳

(0/65535文字)

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.043s