Как мне установить результат запроса равным переменной в VBA?

Question

У меня есть таблица с названием MIUInfo. В нем есть три колонки; MIUID, Latitude и Longitude.
В нем я выполняю следующий запрос, который получает число MIUID s в диапазоне критериев.

SELECT Count(MIUInfo.MIUID)
      From MIUInfo 
      WHERE ((MIUInfo.Latitude Between " & minLat & " And " & maxLat & ") 
      AND (MIUInfo.Longitude Between " & minLong & " And " & maxLong & "))

Мне нужно установить результат этого запроса равным переменной в VBA, чтобы я мог использовать его в качестве условия для цикла. Я не могу понять, как это сделать.

Также, когда я пытаюсь использовать команду DoCmd.RunSQL, я получаю сообщение об ошибке:

Ошибка времени выполнения '2342': для действия RunSQL требуется аргумент оператора SQL.

Единственное различие между этим запросом и другим, с которым я работаю с DoCmd.RunSQL, заключается в том, что все остальные запросы select генерируют новую таблицу.

Answer 1

Использование DCOUNT

Answer 2

В Access самый простой способ сделать это с помощью функции DCount :

Total = DCount("MIUInfo.MIUID", "MIUInfo", "(MIUInfo.Latitude Between " & minLat & " And " & maxLat & ") AND (MIUInfo.Longitude Between " & minLong & " And " & maxLong & ")")