Comment utiliser la variable initiée dans la requête SQL?

Question

J'ai fait une requête pour obtenir une valeur maximale d'une certaine colonne

sSQLmax = "SELECT MAX([tablename]!rowname) as MaxNum FROM [tablename]"

Je veux utiliser la valeur maxnum.Je l'ai essayé dans une boîte msg et m'a donné une valeur vide.J'ai essayé tout cela:

MsgBox "MaxNum" & MaxNum

MsgBox "MaxNum" & sSQLMAX.MaxNum

MsgBox "MaxNum" & sSQLMAX!MaxNum

plus du code

Dim db As DAO.Database, rst As DAO.Recordset
Set db = CurrentDb
Set rst = db.OpenRecordset(sSQLmax)

mais aucun ne fonctionne, je suis sûr que c'est simple mais qu'il m'échappe

Answer 1

Avec votre code, vous ne définissez qu'une variable à une chaîne.Vous ne faites rien avec elle.C'est probablement plus de ce que vous recherchez:

Dim db As DAO.Database, rst As DAO.Recordset, sSQLmax As String
sSQLmax = "SELECT MAX([tablename].rowname) as MaxNum FROM [tablename]"
Set db = CurrentDb

Set rst = db.OpenRecordset(sSQLmax, dbOpenDynaset)

If (rst.RecordCount <> 0) Then
  rst.MoveFirst
  MsgBox "MaxNumber: " & rst.Fields("rowname")
End If

Answer 2

Essayez la fonction dmax

Dim result as String
result = DMax("[COLUMN NAME]", "[TABLE NAME]")