Récupérer le résultat d'une requête SQL dans une variable entière VBA

Bonjour tout le monde,

J'ai une requête SQL que voici :

Code:

---

1 2 3

SELECT count(*) AS total FROM [rqt intel] WHERE [nbAnnee]='3';

---

J'aimerais récupérer le résultat de cette requête qui est 36 dans un module VBA (dans une variable entière).

J'ai essayé ceci mais ça ne fonctionne pas :

Code:

---

1 2	Dim nombre nombre = SELECT count(*) AS total FROM [rqt intel] WHERE [nbAnnee]='3'

---

J'obtiens ce message d'erreur :

Citation:

---

"Incompatibilité de type"

---

J'espère que vous saurez m'aider.

Merci d'avance pour votre aide.

beegees

salut,
je te recommande cette syntaxe :

Code:

---

nombre= Dlookup("COUNT(*)","[rqt intel]","[nbAnnee]='3'")

---

attention, ici nbannee est considéré comme de type texte, est-ce bien le cas ?

Salut,

Merci pour ta réponse.

nbannee a bien un champs texte dans ma base de donnée access.

En utilisant ton code, j'obtiens ce message d'erreur :

Citation:

---

2001 : opération annulée

---

Qu'en penses-tu ?

Merci encore pour ton aide.

beegees

[req intel] ressemble à quoi comme requete stp ?

Bonjour

Essayes plutôt

Code:

---

nombre= DCount("*","[rqt intel]","[nbAnnee]='3'")

---

Starec

Citation:

---

Envoyé par jpcheck

[req intel] ressemble à quoi comme requete stp ?

---

Citation:

---

Envoyé par Starec

Bonjour

Essayes plutôt

Code:

---

nombre= DCount("*","[rqt intel]","[nbAnnee]='3'")

---

Starec

---

Bonjour,

Un super grand merci à vous deux pour votre dévouement qui a fini par payer, ça fonctionne :yaisse2:

J'ai essayé avec ce code et surtout, j'ai modifié le nom de la variable, s'est surtout ça qui ne fonctionnait pas :oops:

Code:

---

nombre= DCount("*","[rqt intel]","[nbAnnee]='3'")

---

encore un super grand merci à vous deux.

beegees