Discussion :

[loverdev]

, j'ai une fonction qui permet de mettre le format d'un montant sous la forme 125,125. Mais en essayant d'exécuter le code, il me sort le msg "La conversion de la chaîne " " en type 'Double' n'est pas valide". Voici le code de ma fonction :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Const FORMAT_CURRENCY = "#,###,###,##0.###############;(#,###,###,##0.###############)"
Function MonFormat(ByVal Value As Double, ByVal NbDec As VariantType) As String
        Dim Dec As String
        Dim F As String
        Dec = ""
        If Val(NbDec) = "" Then
            MonFormat = Format(CDec(Value), FORMAT_CURRENCY)
        Else
            If Val(NbDec) > 0 Then Dec = "." & String.Format(NbDec, "0")
            F = "#,###,###,##0" & Dec & ";(#,###,###,##0" & Dec & ")"
            MonFormat = Format(CDec(Value), F)
        End If
    End Function

Et voici où l'erreur vient :

Code :

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

1
2
 
If Val(NbDec) = "" Then

J'ai besoin d'aide pour voir d'où provient le pb et comment le corriger?

[Chii-san]

Normal, tu essaies de comparer le retour de Val() (Double), avec "" (String).

[loverdev]

Comment le corriger?

[Chii-san]

Ben ça dépend de ce que tu veux faire avec ce If, tu peux utiliser un Try Catch pour gérer le cas où Val() n'a pas pu convertir la paramètre que tu lui donnes.
Et dans le cas où tout se passe bien, gérer le cas où la valeur vaut 0.

[loverdev]

Je vous explique ce que je veux faire. J'ai par exemple un champ "Montant d'un contrat" et un 2ème champ "Reste à payer". Je veux que lorsque je saisi le montant du contrat, il me met automatiquement le montant tout en respectant les chiffres après la virgule. Si vous connaissez une méthode plus simple que cette fonction, pouvez vous me la donnez? Sinon, comment corriger cette fonction pour qu'elle puisse fonctionner?

[Aspic]

Bah utilise le type Decimal pour la précision... Je ne vois pas à quoi sert ta fonction compliquée !

Quel est "l'algorithme" utilisée pour convertir ton "montant d'un contrat" en "restant à payer" ?