Aller directement au contenu principal

FormatNuméro

Renvoie une expression formatée sous forme de nombre.

Structure

FormatNumber(Expression [,NombreDeChiffresAprèsLaVirgule [,InclureLeChiffreDeTête [,UtiliserDesParenthèsesPourLesNombresNégatifs [,RegrouperLesChiffres]]]])

Paramètres

Expression - Obligatoire. Expression à mettre en forme.

NumDigitsAfterDecimal - Facultatif. Valeur numérique indiquant le nombre de chiffres affichés à droite de la virgule. La valeur par défaut est -1, ce qui signifie que les paramètres régionaux de l'ordinateur sont utilisés.

IncludeLeadingDigit - Facultatif. Constante Tristate indiquant si un zéro initial doit être affiché ou non pour les valeurs décimales. Consultez la section « Paramètres » pour connaître les valeurs.

Utiliser des parenthèses pour les nombres négatifs - Facultatif. Constante à trois états indiquant s'il faut ou non mettre les valeurs négatives entre parenthèses. Consultez la section « Paramètres » pour connaître les valeurs.

GroupDigits - Facultatif. Constante à trois états indiquant si les nombres sont regroupés ou non à l'aide du délimiteur de groupe spécifié dans le panneau de configuration. Consultez la section « Paramètres » pour connaître les valeurs.

Valeurs des paramètres

Les options « IncludeLeadingDigit », « UseParensForNegativeNumbers » et « GroupDigits » peuvent prendre les valeurs suivantes :

Valeur constante Description

TristateVrai -1 Vrai

TristateFaux 0 Faux

TristateUseDefault -2 Utiliser les paramètres régionaux de l'ordinateur.

Description

Lorsqu'une ou plusieurs des structures facultatives sont omises, les valeurs correspondant aux structures omises sont fournies par les paramètres régionaux de l'ordinateur.

Remarque

Toutes les informations relatives aux paramètres proviennent de l'onglet « Numéro de paramètres régionaux ».

Exemple

L'exemple suivant utilise la fonction FormatNumber pour formater un nombre avec quatre décimales :

Fonction FormatNumberDemo

Dim MyAngle, MySecant, MyNumber

MyAngle = 1,3 ' Définir l'angle en radians.

MySecant = 1 / Cos(MyAngle) ' Calculer la sécante.

FormatNumberDemo = FormatNumber(MySecant, 4) ' Affiche MySecant avec quatre décimales.

Fin de la fonction |