FORMATCURRENCY |
Format de monnaie |
|---|---|
| Visual Basic | |
Syntaxe
| Function FormatCurrency(expression[,NumDigAfterDec[,IncLeadingDig[,UseParForNegNum[,GroupDig]]]]) |
Paramètres
| Nom | Description | ||
|---|---|---|---|
| expression | Ce paramètre permet d'indiquer l'expression à convertir | ||
| NumDigAfterDec | Ce paramètre permet d'indiquer le nombre de décimal | ||
| IncLeadingDig | Ce paramètre permet d'indiquer si le nombre de zéro soit affiché par valeurs fractionnaire : | ||
| Valeur | Description | ||
| -2 | Cette valeur permet d'indiquer qu'il faut utiliser la valeur par défaut. | ||
| -1 | Cette valeur permet d'indiquer qu'il faut que le nombre de zéro soit affiché par valeurs fractionnaire. | ||
| 0 | Cette valeur permet d'indiquer qu'il ne faut pas que le nombre de zéro soit affiché par valeurs fractionnaire. | ||
| UseParForNegNum | Ce paramètre permet d'indiquer s'il faut placer les valeurs négatifs entre parenthèse : | ||
| Valeur | Description | ||
| -2 | Cette valeur permet d'indiquer qu'il faut utiliser la valeur par défaut. | ||
| -1 | Cette valeur permet d'indiquer qu'il faut placer les valeurs négatifs entre parenthèse. | ||
| 0 | Cette valeur permet d'indiquer qu'il ne faut pas placer les valeurs négatifs entre parenthèse. | ||
| GroupDig | Ce paramètre permet d'indiquer s'il faut regrouper les nombres en utilisant les délimiteurs régionales : | ||
| Valeur | Description | ||
| -2 | Cette valeur permet d'indiquer qu'il faut utiliser la valeur par défaut. | ||
| -1 | Cette valeur permet d'indiquer qu'il faut regrouper les nombres en utilisant les délimiteurs régionales. | ||
| 0 | Cette valeur permet d'indiquer qu'il ne faut pas regrouper les nombres en utilisant les délimiteurs régionales. | ||
Description
Cette fonction retourne une expression formaté selon un format de monnaie.
Remarques
- Lorsqu'un ou plusieurs paramètres facultatifs sont omis, les valeurs des paramètres omis sont fournies par les paramètres régionaux de l'ordinateur. La position du symbole monétaire par rapport à la valeur monétaire est déterminée par les paramètres régionaux du système.
- Toutes les informations sur les paramètres proviennent de l'onglet Devise des paramètres régionaux, à l'exception du zéro venant de l'onglet Nombre.
- L'exemple suivant utilise la fonction FormatCurrency pour mettre en forme l'expression en tant que devise et l'affecter à MyCurrency :
Dim MyCurrency
MyCurrency = FormatCurrency(1000) 'MyCurrency contient $1000.00
Exemple
Voici un exemple d'une utilisation typique de cette fonction :
- Sub Main()
- MsgBox "10000 = " & FormatCurrency(10000) & vbCrLf & _
- "10000.587,2 = " & FormatCurrency(10000.587,2) & vbCrLf & _
- "10000.587,2,,,0 = " & FormatCurrency(10000.587,2,,,0) & vbCrLf & _
- "13567 = " & FormatCurrency(13567) & vbCrLf & _
- "13567.8977 = " & FormatCurrency(13567.8977) & vbCrLf & _
- "30000 = " & FormatCurrency(30000) & vbCrLf & _
- "30000.587,2 = " & FormatCurrency(30000.587,2) & vbCrLf & _
- "30000.587,2,,,0 = " & FormatCurrency(30000.587,2,,,0) & vbCrLf & _
- "31567 = " & FormatCurrency(31567) & vbCrLf & _
- "31567.9877 = " & FormatCurrency(31567.9877)
- End Sub
on obtiendra le résultat suivant :
10000 = 10 000,00 €10000.587,2 = 10 000,59 €
10000.587,2,,,0 = 10000,59 €
13567 = 13 567,00 €
13567.8977 = 13 567,90 €
30000 = 30 000,00 €
30000.587,2 = 30 000,59 €
30000.587,2,,,0 = 30000,59 €
31567 = 31 567,00 €
31567.9877 = 31 567,99 €
Dernière mise à jour : Lundi, le 19 novembre 2012