VBA : Comment formater les cellules en pourcentage
Vous pouvez utiliser la syntaxe de base suivante dans VBA pour formater chaque cellule d’une plage sous forme de pourcentage.
Sub FormatPercent()
Dim i As Integer
For i = 2 To 11
Range("A" & i).NumberFormat = "0.00%"
Next i
End Sub
Cet exemple particulier formate chaque cellule de la plage A2:A11 sous forme de valeur de pourcentage avec deux décimales.
L’exemple suivant montre comment utiliser cette syntaxe dans la pratique.
Exemple : formater les cellules en pourcentage à l’aide de VBA
Supposons que nous ayons la liste de valeurs suivante dans Excel :
Supposons que nous souhaitions formater chaque valeur sous forme de pourcentage.
Par exemple:
- 0,22 doit être formaté comme 22 %.
- 0,35 doit être formaté comme 35 %.
Et ainsi de suite.
Nous pouvons créer la macro suivante pour ce faire :
Sub FormatPercent()
Dim i As Integer
For i = 2 To 11
Range("A" & i).NumberFormat = "0.00%"
Next i
End Sub
Lorsque nous exécutons cette macro, nous recevons le résultat suivant :
Chaque valeur est désormais formatée sous forme de pourcentage avec deux décimales.
Notez que le nombre de zéros après la virgule décimale dans la propriété NumberFormat spécifie le nombre de décimales à afficher dans chaque pourcentage.
Nous pourrions utiliser la syntaxe suivante pour n’afficher aucune décimale dans chaque pourcentage :
Sub FormatPercent()
Dim i As Integer
For i = 2 To 11
Range("A" & i).NumberFormat = "0%"
Next i
End Sub
Lorsque nous exécutons cette macro, nous recevons le résultat suivant :
Notez que les décimales ont été supprimées de chaque valeur de pourcentage.
Remarque : Vous pouvez trouver la documentation complète de la propriété VBA NumberFormat ici .
Ressources additionnelles
Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes dans VBA :
VBA : Comment trier une feuille sur plusieurs colonnes
VBA : Comment compter le nombre de lignes dans la plage
VBA : comment filtrer une colonne