Discussion :

[fourniey]

Bonjour,

J'ai un formulaire qui contient trois sommes provenant d'un sous-formulaire et ça fonctionne correctement sauf lorsqu'il n'y a pas de transactions.

Dans ce cas, mes sommes afficher #Erreur dans le champs.

J'ai essayé de mettre un nz, sans succès.

Voici une des sommes :

Code :

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

=Somme(VraiFaux([impact]=0;[ENGAGEMENT];0))

Merci de m'aider si vous avez une idée.

[marot_r]

Bonjour.

C'est souvent un problème. J'ai essayé de faire une BD de test pour générer l'erreur mais je n'y parviens pas donc je vais faire des suggestions :

Code :

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

=Somme(VraiFaux(Nz([impact];1)=0;Nz([ENGAGEMENT];0) ;0))

sinon avec une fonction VBA à mettre dans le module associé au formulaire.

Code :

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

1
2
3
public function ADonnees() as boolean
   ADonnees=(me.recordset.recordcount<>0) 'Il y a au moins un enregistrement donc il y a des données
end function

Code :

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

=iif(ADonnees(); Somme(VraiFaux([impact]=0;[ENGAGEMENT];0)); 0)

A+

[fourniey]

Merci pour tes options de solutions,

La première ne fonctionne pas, je l'avais testé.

Pour la 2e, je vais voir. Ne fonctionne pas!

[fourniey]

Je traine ce problème depuis plusieurs mois sans solution.

[marot_r]

Bonjour.

Je suis surpris que ma 2ième solution ne fonctionne pas.

As-tu vérifiié que ADonnees fonctionne correctement ?

Si oui, cela vient sans doute du iif() qui exécute à la fois la condition vrai et la condition fausse.
Dans ce cas, essaye en inversant les termes :

Code :

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

=iif(not ADonnees(); 0; Somme(VraiFaux([impact]=0;[ENGAGEMENT];0)))

Et si cela ne marche vraiment pas, je pense qu'il va falloir remplacer le Somme() par un DSum().
Le problème c'est que le Somme() se base sur les enregistrements affichés par le sous-formulaire tandis que le DSum() se base sur un critère.
Il va donc falloir faire en sorte que le critère corresponde aux enregistrements affichés ce qui peut être délicat si on applique un filtre au sous-formulaire.

A+

[fourniey]

J'ai regardé ton option avec adonnees et je ne suis pas assez familier pour savoir quoi faire.

[fourniey]

Bonjour.

C'est souvent un problème. J'ai essayé de faire une BD de test pour générer l'erreur mais je n'y parviens pas donc je vais faire des suggestions :

Code :

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

=Somme(VraiFaux(Nz([impact];1)=0;Nz([ENGAGEMENT];0) ;0))

sinon avec une fonction VBA à mettre dans le module associé au formulaire.

Code :

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

1
2
3
public function ADonnees() as boolean
   ADonnees=(me.recordset.recordcount<>0) 'Il y a au moins un enregistrement donc il y a des données
end function

Code :

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

=iif(ADonnees(); Somme(VraiFaux([impact]=0;[ENGAGEMENT];0)); 0)

A+

Pour cette ligne, le commentaire est faux : ADonnees=(me.recordset.recordcount<>0) 'Il y a au moins un enregistrement donc il y a des données

pour un enregistrement, j'affiche les transactions mais il arrive qu'il n'y en a pas et c'est là, que le mot erreur apparaît.

[marot_r]

Hum. il est possible que quand il n'y a pas de données l'objet recordset n'existe même pas.

Essaye :

Code :

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

1
2
3
4
5
6
7
8
9
public function ADonnees() as boolean
 
   if not me.recordset is nothing then
         ADonnees=(me.recordset.recordcount<>0) 'Il y a au moins un enregistrement donc il y a des données
      else
         ADonnees=false
   end if
 
end function

A+