08/05/06 06:39:34
>>623 さんをちょっと変形するともうちょい速くなるんじゃないかな
WHERE の条件に、自作関数を指定出来るから
そこで複数条件を一度にチェックすれば
繰り返し回数(6000)を少なく出来る
こんな感じ 気が向いたらお試しを
WHERE ([不一致]=False) AND ((check_val([フィールド１],[フィールド２],[フィールド３]))=True)
Function check_val(fld1 As Variant, fld2 As Variant, fld3 As Variant) As Boolean
(fld1 = 1 And fld2 = 2 And fld3 = "OK") Then
check_val = True
Else
check_val = False
End If
End Function