Bonsoir le forum,
J'attaque Access depuis peu et je bute sur une subtilité avec les dates et les sommes.
Je cherche à faire un comptage et une somme avec pour critère une date. J'arrive à faire un comptage quand c'est des chaines de caractère mais pas avec des dates.
Il faut que mes critères soient variables (Exercice et Critere), car ils sont changeant. De plus il faut que je fasse la somme de la table correspondante MONTANT quand les critères correspondent.
Exercice = 2020
Critere = "01/02/2020"
Set Base = DBEngine.OpenDatabase(ThisWorkbook.Path & "\TEST.accdb")
Set ENR = Base.OpenRecordset("SELECT * FROM " & Exercice & " WHERE DATE=" & Chr(34) & Critere & Chr(34), dbOpenDynaset)
ENR.MoveLast
LngNbEnregistrement = ENR.RecordCount
Merci encore pour le coup de pouce.
Seb
J'attaque Access depuis peu et je bute sur une subtilité avec les dates et les sommes.
Je cherche à faire un comptage et une somme avec pour critère une date. J'arrive à faire un comptage quand c'est des chaines de caractère mais pas avec des dates.
Il faut que mes critères soient variables (Exercice et Critere), car ils sont changeant. De plus il faut que je fasse la somme de la table correspondante MONTANT quand les critères correspondent.
Exercice = 2020
Critere = "01/02/2020"
Set Base = DBEngine.OpenDatabase(ThisWorkbook.Path & "\TEST.accdb")
Set ENR = Base.OpenRecordset("SELECT * FROM " & Exercice & " WHERE DATE=" & Chr(34) & Critere & Chr(34), dbOpenDynaset)
ENR.MoveLast
LngNbEnregistrement = ENR.RecordCount
Merci encore pour le coup de pouce.
Seb