Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jeff
Bonjour
Une piste...
Avec un requête qui renvoit un champ nommé ici "Champ1", on pourrait faire :
Function RetourRequête()
Dim db As Dao.Database, rst As Dao.Recordset
Set db = CurrentDb() Set rst = db.OpenRecordset("nomdelarequête") If rst.RecordsetClone.RecordCount > 0 Then RetourRequête = rst![Champ1] Else RetourRequête = Null End If rst.Close db.Close
End Function
Cordialement
Jeff
Charte du forum : http://users.skynet.be/mpfa/
"Thomas" a écrit dans le message de news:0ab201c368a3$caf81600$ Je désire affecter la valeur renvoyée par une requête à une variable. Comment faut-il procéder (sous VBA)?
J'utilise la fonction suivante: DoCmd.OpenQuery "MaRequête"
Bonjour
Une piste...
Avec un requête qui renvoit un champ nommé ici "Champ1", on pourrait faire :
Function RetourRequête()
Dim db As Dao.Database, rst As Dao.Recordset
Set db = CurrentDb()
Set rst = db.OpenRecordset("nomdelarequête")
If rst.RecordsetClone.RecordCount > 0 Then
RetourRequête = rst![Champ1]
Else
RetourRequête = Null
End If
rst.Close
db.Close
End Function
Cordialement
Jeff
Charte du forum : http://users.skynet.be/mpfa/
"Thomas" <maitre_fog@caramail.com> a écrit dans le message de
news:0ab201c368a3$caf81600$a401280a@phx.gbl...
Je désire affecter la valeur renvoyée par une requête à
une variable. Comment faut-il procéder (sous VBA)?
J'utilise la fonction suivante:
DoCmd.OpenQuery "MaRequête"
Avec un requête qui renvoit un champ nommé ici "Champ1", on pourrait faire :
Function RetourRequête()
Dim db As Dao.Database, rst As Dao.Recordset
Set db = CurrentDb() Set rst = db.OpenRecordset("nomdelarequête") If rst.RecordsetClone.RecordCount > 0 Then RetourRequête = rst![Champ1] Else RetourRequête = Null End If rst.Close db.Close
End Function
Cordialement
Jeff
Charte du forum : http://users.skynet.be/mpfa/
"Thomas" a écrit dans le message de news:0ab201c368a3$caf81600$ Je désire affecter la valeur renvoyée par une requête à une variable. Comment faut-il procéder (sous VBA)?
J'utilise la fonction suivante: DoCmd.OpenQuery "MaRequête"