bonjour
j ai un code
Rsql = " SELECT FactureClient.NumFact, sum (QteLivree*PrixVente)as total" & _
" FROM FactureClient, bonlivraisonCmdeCli, LigneLivraisonCmdeCli, client, tarifProd" & _
" WHERE bonlivraisonCmdeCli.NumBL = [LigneLivraisonCmdeCli].[NumBL]" & _
" AND FactureClient.NumBL=[BonLivraisonCmdeCli].[NumBl]" & _
" AND client.NumCli=[FactureClient].[NumCli] And client.NumCli=[TarifProd].[NumCli]" & _
" AND tarifProd.CodePdt=[LigneLivraisonCmdeCli].[NumProd]" & _
" AND FactureClient.TVA=False" & _
" group by FactureClient.NumFact "
Set rs = Application.CurrentDb.OpenRecordset(Rsql, dbOpenDynaset)
rs.MoveFirst
Do
MsgBox ("le numero de la facture est:" & rs.Fields("Numfact").Value & " et le montant total est:" & rs.Fields(Sum(QteLivree * PrixVente)).Value)
rs.MoveNext
Loop Until rs.EOF = True
End Function
|
j ai une erreur au niveau du msgBox, il n accepte pas (Sum(QteLivree * PrixVente)).Value) . J ai esayé en mettant total mais il veut pas non plus..
Je sais pas comment faire..
De plus j aimerais multiplié le resultat de (Sum(QteLivree * PrixVente)).Value) par 1.196 mais dans la requete j y arrive pas...
Merci de votre aide
Amaya
