Afficher le nombre des facture uniquement pour aujourd'hui
ERIC
-
yg_be Messages postés 23541 Date d'inscription Statut Contributeur Dernière intervention -
yg_be Messages postés 23541 Date d'inscription Statut Contributeur Dernière intervention -
bonjour a tous.
j'ai un code qui me permet d'afficher le nombre des factures. mais ce code m'affiche le nombre des factures pour plusieurs dates. Ma question: que faire pour qu'il m'affiche uniquement le nombre des facture pour aujourd'hui?
Merci d'avance.
voici mon code:(sachez aussi que dans ma table commande j'ai un champs "datefacture" avec plusieurs dates)
' ===============NOMBRE DES FACTURES===========
Public Function GetNBfacture(Optional datedebut As Variant, Optional datefin As Variant) As Long
Dim db As Database
Set db = CurrentDb
Dim req As String
If Not IsMissing(datedebut) And Not IsMissing(datefin) Then
req = "SELECT Count(*) as nb FROM commandes " & _
" WHERE CodeFacture is not null " & _
" AND DateFacture Between # " & Format(datedebut, "dd/mm/yyyy") & "#" & _
" And #" & Format(datefin, "dd/mm/yyyy") & "#"
Else
req = " SELECT count(*) as nb FROM commandes " & _
" WHERE codefacture is not null"
End If
res = Nz(db.CreateQueryDef(vbNullString, req).OpenRecordset.Fields("nb"), 0)
GetNBfacture = res
db.Close
Set db = Nothing
End Function
j'ai un code qui me permet d'afficher le nombre des factures. mais ce code m'affiche le nombre des factures pour plusieurs dates. Ma question: que faire pour qu'il m'affiche uniquement le nombre des facture pour aujourd'hui?
Merci d'avance.
voici mon code:(sachez aussi que dans ma table commande j'ai un champs "datefacture" avec plusieurs dates)
' ===============NOMBRE DES FACTURES===========
Public Function GetNBfacture(Optional datedebut As Variant, Optional datefin As Variant) As Long
Dim db As Database
Set db = CurrentDb
Dim req As String
If Not IsMissing(datedebut) And Not IsMissing(datefin) Then
req = "SELECT Count(*) as nb FROM commandes " & _
" WHERE CodeFacture is not null " & _
" AND DateFacture Between # " & Format(datedebut, "dd/mm/yyyy") & "#" & _
" And #" & Format(datefin, "dd/mm/yyyy") & "#"
Else
req = " SELECT count(*) as nb FROM commandes " & _
" WHERE codefacture is not null"
End If
res = Nz(db.CreateQueryDef(vbNullString, req).OpenRecordset.Fields("nb"), 0)
GetNBfacture = res
db.Close
Set db = Nothing
End Function
A voir également:
- Afficher le nombre des facture uniquement pour aujourd'hui
- Pas de signal tv aujourd'hui - Guide
- Afficher le 0 devant un nombre dans excel - Guide
- Facture aliexpress ✓ - Forum Consommation & Internet
- Nombre de jours entre deux dates excel - Guide
- Logiciel devis facture - Télécharger - Comptabilité & Facturation
1 réponse
yg_be
Messages postés
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
bonjour,
suggestion:
suggestion:
req = "SELECT Count(*) as nb FROM commandes " & _
" WHERE CodeFacture is not null " & _
" AND int(DateFacture) = " + CStr(CLng(Date))
(Mais ne vous fatiguez pas. Je viens avec une autre question. )