Discussion :

[Defaultuser01]

Bonjour à tous,


J'ai un formulaire de recherche de factures (dépendantes de clients et contenant des lignes - soit 3 tables T_Clients->T_Factures->T_Factures_Details).
Mon formulaire est basé sur ce principe: http://claudeleloup.developpez.com/t...-multicritere/
Qui pour moi fonctionne à merveille et que j'ai l'habitude de mettre en place dans mon application.

Par contre je rencontre une difficulté nouvelle: Un de mes contrôles filtrables contient un montant en € (donc arrondit à 2) et voici un exemple de problème rencontré:
admettons que le montant avant arrondit soit 12.2999999523163; une fois affiché sur le formulaire il devient 12.30 MAIS si dans le filtre du montant on tape 12.30, la facture correspondante ne s'affichera pas car le filtre demande 12.2999999523163...

J'ai tenté d'utiliser la fonction Round dans le contrôle et dans la requête mais sans succès.
J'ai vérifié que tous les champs permettant d'avoir mon montant total étaient eux aussi bien en €. Maintenant.... J'espère vraiment que vous n'allez pas me répondre qu'il fallait mettre tous les champs en numérique avec l'arrondit

Une idée?


A bientôt.


[EDIT]
Je viens de remarquer que un chiffre avant affichage en € tel que 9.9 qui devient 9.90€ n'est lui aussi pas affiché si dans le filtre on tape 9.90, il faut impérativement entrer 9.9... Je crains le pire...

[ClaudeLELOUP]

Bonjour,

Voici un exemple pour contourner le problème.



Si pas de filtre, la source est la table Vins.


Lorsqu’on modifie un filtre, on change la source pour y mettre cette requête :




Voici le code

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Option Compare Database
Option Explicit
 
 
Private Sub FiltrePrixArrondi_AfterUpdate()
  Call MajSource
End Sub
 
Public Sub MajSource()
 Me.RecordSource = ""
  If Not IsNull(Me.FiltrePrixArrondi) Then
      Me.RecordSource = "rFiltre"
    Else
      Me.RecordSource = "Vins"
  End If
End Sub

Et on obtient ceci :

[Defaultuser01]

Merci beaucoup pour cet exemple; encore une fois tu as su me montrer la sortie du tunnel

J'avais effectivement lu un article au sujet de module pour arrondir les montants, mais je pensais que la fonction round me suffirait (Du moins j'espérais car son utilisation me semblait plus simple). Au moins maintenant je saurais comment arrondir correctement un montant grâce à ton module (que j'ai du relire.... pas mal de fois pour comprendre toute la mécanique).


A bientôt.

[ClaudeLELOUP]

que j'ai du relire.... pas mal de fois pour comprendre toute la mécanique

Désolé, j'aurais dû renseigner cette adresse : http://www.developpez.net/forums/d97...arrondir-prix/