Discussion :

[ToFind]

Bonjour,

Je souhaiterais que le résultat d'un calcul retourne "0" en l'absence de résultat. Autrement dit, si MontantEncaiss est nul, le résultat doit être "0".

J'ai essayé ceci :

Code :

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

1
2
3
 SELECT DISTINCTROW TblEncaissements.IdProforma, Nz(Sum([MontantEncaiss]),0) AS SommeMontantEncaiss
FROM TblEncaissements
GROUP BY TblEncaissements.IdProforma;

dans mon champs calculé, mais le champ reste vide en cas d'absence de résultat.
Merci de votre avis.

Guy.

[Invité]

Bonjour
Ta requête semble correcte et en simulant j'obtiens bien des 0.
As tu essayé en changeant:

Code :

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

1
2
3
 SELECT DISTINCTROW TblEncaissements.IdProforma, Sum(Nz([MontantEncaiss],0)) AS SommeMontantEncaiss
FROM TblEncaissements
GROUP BY TblEncaissements.IdProforma;

[ToFind]

Bonjour,

J'avais déjà essayé ce que tu proposes, mais je n'obtiens pas plus de résultat.

Autrement dit, si le sous-formulaire basé sur la table TblEncaissements ne contient pas de données pour l'enregistrement en cours, le champ SommeMontantEncaiss ne s'affiche pas dans le sous-formulaire (pas de champ et donc pas de 0). A l'inverse, si des données sont présentes, le champ et le calcul de SommeMontantEncaiss s'affichent bien.

As-tu une autre idée?

Merci.

[Invité]

Bonjour
Peut être faut-il mettre la fonction Nz dans le ControlSource de la zone "MontantEncaiss"du sous-formulaire.

[ToFind]

Bonsoir,
Malheureusement, je suis obligé de placer le Nz dans la requête. En effet, si je gère le Nz dans le formulaire, je n'aurai pas la possibilité d'effectuer une requête sur ce champ là... et c'est nécessaire.

[f-leb]

bonsoir,

Si j'ai bien compris, si pour un idProforma donné il n'y a pas d'encaissement, c'est carrément la ligne de cet idProforma qui est éjectée de la requête du 1er message.

si le sous-formulaire basé sur la table TblEncaissements ne contient pas de données pour l'enregistrement en cours, le champ SommeMontantEncaiss ne s'affiche pas dans le sous-formulaire (pas de champ et donc pas de 0)

Si l'idProForma est éjecté dans la source du sous-formulaire, la relation champ père/champ fils (via idProforma) pour le bon fonctionnement du couple formulaire/sous-formulaire ne peut se faire.

Ce que l'on peut tenter, c'est réécrire la requête source du sous-formulaire et faire en sorte qu'elle ramène tous les idProforma de la table principale TblProforma, du style:

Code sql :

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

1
2
3
4
5
6
SELECT 
TblProForma.idProforma, 
Nz(Sum(TblEncaissement.MontantEncaiss),0) AS SommeDeMontantEncaiss
FROM TblProForma LEFT JOIN TblEncaissement
ON TblProForma.idProforma = TblEncaissement.idProforma
GROUP BY TblProForma.idProforma;

[ToFind]

Bonjour,

Merci Fabien pour ton judicieux conseil que j'ai appliqué. Le "zéro" s'affiche bien maintenant.
J'ai essayé de reproduire le même principe dans le sous-fotmulaire affichant les totaux (HTVA, TVA et TVAC), ainsi que dans le sous-formulaire affichant le solde restant dû.
Malgré mes tentatives, je n'y parviens pas...

Voici ce que j'ai essayé pour le total facturé :

Code :

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

1
2
3
SELECT TblProforma.IdProforma, Round(Sum(Nz([RqProformaCalculLigne].[TotHtvaLigne],0)),2) AS SommeDeTotHtvaLigne, Round(Sum(Nz([RqProformaCalculLigne].[TotTvaLigne],0)),2) AS SommeDeTotTvaLigne, Round(Sum(Nz([TotHtvaLigne],0)+Nz([TotTvaLigne],0)),2) AS TotTvac
FROM RqProformaCalculLigne LEFT JOIN TblProforma ON RqProformaCalculLigne.[IdProforma] = TblProforma.IdProforma
GROUP BY TblProforma.IdProforma;

Et pour le solde dû :

Code :

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

1
2
SELECT RqProformaCalculTot.IdProforma, RqEncaissementsCalculTot.IdProforma, RqProformaCalculTot.TotTvac, RqEncaissementsCalculTot.SommeMontantEncaiss, Round(Nz([TotTvac],0)-Nz([RqEncaissementsCalculTot]![SommeMontantEncaiss],0),2) AS ResteDu
FROM RqProformaCalculTot, RqEncaissementsCalculTot;

Qu'en penses-tu?

Merci pour ton aide.

[f-leb]

bonsoir,

pour la première:

Code sql :

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

FROM RqProformaCalculLigne LEFT JOIN TblProforma

essaie l'inverse:

Code sql :

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

FROM TblProforma LEFT JOIN RqProformaCalculLigne

[ClaudeLELOUP]

Bonsoir vous trois,

si le sous-formulaire basé sur la table TblEncaissements ne contient pas de données pour l'enregistrement en cours

Dans un cas semblable, j'utilise cette fonction qui me renvoie Zéro si la valeur est Null ou si elle est en erreur.

Code :

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

1
2
3
4
5
6
7
Public Function CeciOuZero(Ceci As Variant) As Variant
On Error GoTo EnErreur
CeciOuZero = Nz(Ceci, 0)
Exit Function
EnErreur:
CeciOuZero = 0
End Function

[ToFind]

Un tout grand merci pour votre aide.

C'est OK.

Bonne journée.

Guy.