Fonction VBA dans requête [Résolu]

[chelmi95]

Bonsoir,

J'ai créé une fonction dans VBA (code ci-dessous) pour l'utiliser dans une requête. Ma fonction marche sans aucun problème. Le soucis que j'ai, c'est quand je crée une nouvelle requête basé sur une requête qui contient le champ calculé "Reste à facturer" je n'arrive pas à faire la somme de ce champ, il m'indique l'erreur suivante :"Type de données imcompatible...".

Si quelqu'un à une solution je le remercie d'avance.

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Public Function Reste_A_Facturer(FactureEgide As Variant, MontantDemandé As Double, Annulé As Boolean, Refusé As Boolean) As Double
If IsNull(FactureEgide) Then
    If Annulé = True Or Refusé = True Then
        Reste_A_Facturer = 0
    Else
        Reste_A_Facturer = MontantDemandé
    End If
 
    Else
        Reste_A_Facturer = 0
End If
 
 
 
 
End Function

[Thierry85]

Bonjour,
J'ai eu le même problème que j'ai résolu ainsi :
dans la requête, créez un champ calculé qui aura la forme suivante :

NouveauChamp:Format([Reste_A_Facturer];"Fixe")

Bonne journée.

[chelmi95]

Merci beaucoup.