VBとACCESS連携について (ID:126470)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 あこさま 了解致しました。 ということは、以下のように組めばテーブルAとテーブルBで比較した上で、見つかればテーブルAを次の行に移すことができるということでしょうか。 Do Until(rsTableA.EOF) '比較処理 Do Until(rsTableB.EOF) If rsTableA("Col01") = rsTableB("Col01") Then strTmp = rsTableA(ColA) End If '見つからなければテーブルBの行を1行ずらす rsTableB.MoveNext '見つかるまで検索 Loop 'レコードBが終了したので、テーブルAを1行ずらす rsTableA.MoveNext Loop またSet rsTableA = hogehogeAでRecordSetを定義していると考えればよろしいのでしょうか。 重ね重ね恐縮ですが、御確認いただければと存じます。 宜しくお願い申し上げます。