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
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!