Discussion :

[marot_r]

Bonjour à tous et merci de votre temps et aide.

J'ai une appli de facturation avec une série de lignes produit. Chaque ligne a un champ PrixTotal (Qte * Prix U) que je veux sommer. Le détail des produits est dans un sous formulaire en mode feuille de donnée (donc pas d'entête ni de pied).

J'ai essayé avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
TotalFacture=DomSom([Me]![FactureDetail]![PrixTotal],[FactureDetail].recordset)

directement dans le champ calculé.

Comme cela ne marchait pas j'ai mis dans une fonction VBA

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Result=DSum(Me![FactureDetail].Form![PrixTotal], Me![FactureDetail].Recordset)

Le .Recorset c'est pour qu'il travaille sur ma facture en cours, pas sur toute la table détail.

Le calcul s'arrète nette sur l'instruction sans erreur et sans résultat.

Y a t'il un grand maître des DSum et accès au sous-forme qui aurait la solution ? Parceque là, je nage :-).

A+

[Arkham46]

slt,

même en feuille de données tu peux faire la somme dans un pied de formulaire du Sous Formulaire, disons dans un champ ChampSommeDePrixTotalDuSousForm :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=somme([PrixTotal])

elle ne sera pas visible mais tu peux la récupérer dans le formulaire principal quand même :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=[FactureDetail].Formulaire![ChampSommeDePrixTotalDuSousForm]

[marot_r]

Merci mais je m'appercois que j'ai oublié de préciser un point qui m'a poussé vers DSum :

Je ne ne veux pas la somme de TOUTES les lignes mais seulement ce celles qui réponde à un critère précis (ex Code="PERS"). J'ai des taxes a appliquer qui dépende du type de produit.

Donc malgrès cette excélente réponse, ma question reste ouverte.

A la lecture de plusieurs site web il semblerai que la seul solution soit de faire le DSum sur la table sous-jacente avec les critères voulus mais si quelqu'un a une solution autre merci.

A+

[Arkham46]

ben je dirais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
=somme(vraixfaux(Code="PERS";[PrixTotal];0))

à moins qu'il n'y ait une autre contrainte...

[marot_r]

Non, non ... enfin presque :-) mais je vais les gérer moi-même :-)).

Merci du coup de main.

A+