![](https://codky.com/wp-content/uploads/2024/11/2739-1024x576.png)
La fonction `FormatPercent` en VBA est utilisée pour formater un nombre en tant que pourcentage. Elle prend un nombre et le convertit en une chaîne de pourcentage, en ajoutant un symbole de pourcentage et en formatant le nombre selon le nombre de décimales spécifié.
Voici la syntaxe de base de la fonction `FormatPercent` :
FormatPercent(Expression, [NumDigitsAfterDecimal], [IncludeLeadingDigit], [UseParensForNegativeNumbers], [GroupDigits])
- Expression : Obligatoire. L’expression numérique que vous voulez formater.
- NumDigitsAfterDecimal : Facultatif. Spécifie combien de chiffres doivent être affichés après le séparateur décimal. Si omis, la valeur par défaut est -1, ce qui sous-entend le paramètre régional par défaut.
- IncludeLeadingDigit : Facultatif. Indique si un zéro doit être affiché devant des valeurs fractionnaires (valeurs entre -1 et 1). Utilisez `vbTrue` pour inclure le zéro (par défaut), `vbFalse` pour ne pas l’inclure.
- UseParensForNegativeNumbers : Facultatif. Spécifie si les nombres négatifs doivent être placés entre parenthèses. Utilisez `vbTrue` pour encapsuler les nombres négatifs entre parenthèses, sinon utilisez `vbFalse`.
- GroupDigits : Facultatif. Détermine si les chiffres doivent être groupés en utilisant le séparateur de milliers. Utilisez `vbTrue` pour grouper les chiffres, sinon `vbFalse`.
Voici un exemple d’utilisation de `FormatPercent` :
Sub ExempleFormatPercent()
Dim valeur As Double
Dim resultat As String
valeur = 0.1234 ' 12.34%
resultat = FormatPercent(valeur, 2) ' Formate en pourcentage avec 2 décimales
MsgBox "La valeur formatée est " & resultat ' Affiche : La valeur formatée est 12.34%
End Sub
Dans cet exemple, le nombre 0.1234 est formaté en 12.34%, avec deux chiffres après la virgule. Vous pouvez ajuster les autres paramètres selon vos besoins pour changer la manière dont le pourcentage est affiché.