dim SQL as String
Dim rs As Recordset
SQL = "SELECT フィールド名 FROM テーブル名 WHERE Not フィールド名 Between 値1 And 値2 "
Set rs = CurrentDb.OpenRecordset(SQL)
値1 から 値2 の範囲外のレコードを返します。
例: SQL = "SELECT 学生ID FROM 学生名簿 WHERE 体重 Not Between 80 AND 90 "
この場合、体重が80以上、90以下の範囲外の学生IDを抽出します。
これを「OR」にすると
SQL = "SELECT 学生ID FROM 学生名簿 WHERE 体重 <> 90 "
となります。