Vba access / valeur requete >> variable
mato113
-
LatelyGeek Messages postés 1774 Date d'inscription Statut Membre Dernière intervention -
LatelyGeek Messages postés 1774 Date d'inscription Statut Membre Dernière intervention -
Bonjour tout le monde,
J'ai un petit problème...
Donc voila, j'ai une requete qui se modifie en fonction de la table choisie dans la base. Ma requete calcule le nombre de contrat. Le nombre de contrat change en fonction des tables. Je voudrais mettre le resultat de la requete dans une variable que je puisse afficher dans une msgbox.
Je sais que pour récuperer le resultat dans une listbox c'est Me.listbox.rowsource = "ucinet_nb_contrat" mais pour mettre simplement dans une variable je bloque!
aidez moi svp!! lol
Private Sub exp_txt_Click()
Dim SQL As String
Dim Q As DAO.QueryDef
rep = inputbox("veuillez saisir le nom de la table")
SQL = "SELECT Count(nb_contrat) FROM " & rep
Set Q = CurrentDb.QueryDefs("ucinet_nb_contrat")
Q.SQL = SQL 'modification du contenu de la requete "ucinet_nb_contrat"
Set Q = Nothing
si on met resultat dans variable retour >> msgbox" le nombre de contrat pour cette table est " & retour
J'ai un petit problème...
Donc voila, j'ai une requete qui se modifie en fonction de la table choisie dans la base. Ma requete calcule le nombre de contrat. Le nombre de contrat change en fonction des tables. Je voudrais mettre le resultat de la requete dans une variable que je puisse afficher dans une msgbox.
Je sais que pour récuperer le resultat dans une listbox c'est Me.listbox.rowsource = "ucinet_nb_contrat" mais pour mettre simplement dans une variable je bloque!
aidez moi svp!! lol
Private Sub exp_txt_Click()
Dim SQL As String
Dim Q As DAO.QueryDef
rep = inputbox("veuillez saisir le nom de la table")
SQL = "SELECT Count(nb_contrat) FROM " & rep
Set Q = CurrentDb.QueryDefs("ucinet_nb_contrat")
Q.SQL = SQL 'modification du contenu de la requete "ucinet_nb_contrat"
Set Q = Nothing
si on met resultat dans variable retour >> msgbox" le nombre de contrat pour cette table est " & retour
A voir également:
- Vba access / valeur requete >> variable
- Vba range avec variable ✓ - Forum VB / VBA
- Range avec une Variable ✓ - Forum VB / VBA
- Acer quick access - Forum Logiciels
- Quick Access service ✓ - Forum PC portable
- Access runtime ✓ - Forum Access