Come posso impostare un risultato della query uguale a una variabile in VBA?
-
22-07-2019 - |
Domanda
Ho una tabella intitolata MIUInfo
. In esso ci sono tre colonne; MIUID
, Latitude
e Longitude
.
In esso sto eseguendo la seguente query che ottiene il numero di MIUID
nell'intervallo dei criteri.
SELECT Count(MIUInfo.MIUID)
From MIUInfo
WHERE ((MIUInfo.Latitude Between " & minLat & " And " & maxLat & ")
AND (MIUInfo.Longitude Between " & minLong & " And " & maxLong & "))
Devo impostare il risultato di questa query uguale a una variabile in VBA in modo da poterlo utilizzare come condizione per un ciclo. Non riesco a capire come farlo.
Inoltre, quando provo ad usare il comando DoCmd.RunSQL
ricevo un errore:
Errore di run-time '2342': un'azione RunSQL richiede un argomento di un'istruzione SQL.
L'unica differenza tra questa query e le altre in esecuzione con il DoCmd.RunSQL
è che tutte le altre query selezionate generano una nuova tabella.
Soluzione
In Access il modo più semplice per farlo è con DCount funzione:
Total = DCount("MIUInfo.MIUID", "MIUInfo", "(MIUInfo.Latitude Between " & minLat & " And " & maxLat & ") AND (MIUInfo.Longitude Between " & minLong & " And " & maxLong & ")")
Altri suggerimenti
Usa DCOUNT