FORMATNUMBER |
Nombre formaté |
---|---|
Visual Basic |
Syntaxe
Function FormatNumber(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 nombre.
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.
- Toutes les informations sur les paramètres proviennent de l'onglet Numéro des paramètres régionaux.
- L'exemple suivant utilise la fonction FormatNumber pour mettre en forme un nombre avec quatre décimales :
Function FormatNumberDemo
Dim MyAngle, MySecant, MyNumber
MyAngle = 1.3 ' Définit l'angle en radians.
MySecant = 1 / Cos(MyAngle) ' Calculer la sécante.
FormatNumberDemo = FormatNumber(MySecant,4) ' Formate MySecant à quatre décimales.
End Function
Exemple
Voici un exemple d'une utilisation typique de cette fonction :
- Sub Main()
- MsgBox "10000 = " & FormatNumber(10000) & vbCrLf & _
- "10000.587,2 = " & FormatNumber(10000.587,2) & vbCrLf & _
- "10000.587,2,,,0 = " & FormatNumber(10000.587,2,,,0) & vbCrLf & _
- "13567 = " & FormatNumber(13567) & vbCrLf & _
- "13567.8977 = " & FormatNumber(13567.8977) & vbCrLf & _
- "30000 = " & FormatNumber(30000) & vbCrLf & _
- "30000.587,2 = " & FormatNumber(30000.587,2) & vbCrLf & _
- "30000.587,2,,,0 = " & FormatNumber(30000.587,2,,,0) & vbCrLf & _
- "31567 = " & FormatNumber(31567) & vbCrLf & _
- "31567.9877 = " & FormatNumber(31567.9877)
- End Sub
on obtiendra le résultat suivant :
10000 = 10 000,0010000.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