Comment arrondir une plage de nombres à l’entier pair le plus proche dans Excel ?
Qu’est-ce que l’arrondi à l’entier pair dans Excel ? L’arrondi à l’entier pair, également appelé « arrondi bancaire », fonctionne comme un arrondi classique, sauf lorsque le chiffre à arrondir est le nombre 5. Si le chiffre situé avant le 5 est impair, vous devez arrondir à la valeur supérieure ; si le chiffre situé avant le 5 est pair, vous devez arrondir à la valeur inférieure.
Par exemple,23,345 arrondi à l’entier pair au centième devient 23,34. Et 12,335 arrondi à l’entier pair au centième devient 12,34.
Dans cet article, découvrez comment effectuer un arrondi bancaire dans Excel.
Arrondir des nombres à l’entier pair avec une fonction personnalisée
Arrondir des nombres à l’entier pair avec du code VBA
Arrondir des nombres à l’entier pair avec Kutools pour Excel
Arrondir des nombres à l’entier pair avec une fonction personnalisée
Vous pouvez utiliser la fonction personnalisée suivante pour arrondir des nombres à l’entier pair le plus proche dans Excel. Voici la marche à suivre :
1. Sélectionnez les nombres que vous souhaitez arrondir à l’entier pair le plus proche.
2. Maintenez ensuite enfoncées les touches ALT + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
3. Cliquez sur Insertion > Module, puis collez la macro suivante dans la fenêtre du module.
Function BankersRound(num, precision)
BankersRound = Round(num, precision)
End Function
4. Enregistrez le code, puis saisissez la formule = bankersround(a1;2) dans la cellule vide adjacente. Voir la capture d’écran :
5. Appuyez ensuite sur la touche Entrée. Sélectionnez la cellule B1, puis faites glisser la poignée de recopie sur la plage à laquelle vous souhaitez appliquer cette formule. Voir la capture d’écran :
Arrondir des nombres à l’entier pair avec du code VBA
Si vous préférez ne pas utiliser la fonction personnalisée, le code VBA suivant vous sera également utile. Voici la marche à suivre :
1. Sélectionnez la plage que vous souhaitez arrondir à l’entier pair.
2. Maintenez ensuite enfoncées les touches ALT + F11, ce qui ouvre la fenêtre Microsoft Visual Basic pour Applications.
3. Cliquez sur Insertion > Module, puis collez le code suivant dans la fenêtre du module.
Sub RoundToEven()
'Update 20131107
Dim rng As Range
Dim WorkRng As Range
Dim intNumberOfDecimal As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
intNumberOfDecimal = Application.InputBox("NumberOfDecimal", xTitleId, Type:=1)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeConstants, xlNumbers)
For Each rng In WorkRng
rng.Value = Round(rng.Value, intNumberOfDecimal)
Next
End Sub4. Appuyez ensuite sur la touche F5 pour exécuter ce code. Dans la boîte de dialogue qui s’affiche, saisissez le nombre de décimales à conserver lors de l’arrondi. Voir la capture d’écran :
5. Cliquez ensuite sur OK. Tous les nombres sélectionnés ont été arrondis à l’entier pair. Voir les captures d’écran :
 |  |  |
Arrondir des nombres à l’entier pair avec Kutools pour Excel
La fonction personnalisée ou le code VBA vous semblent-ils trop complexes ? Je vous propose une méthode bien plus simple : avec Arrondi sans utiliser de formule de Kutools pour Excel, arrondissez en un clin d’œil toute une plage de nombres à l’entier pair !
Kutools pour Excel propose plus de 300 outils pratiques pour Excel. Essayez-le gratuitement et sans aucune limite pendant 30 jours.Téléchargez-le dès maintenant.
Après avoir installé Kutools pour Excel, procédez comme suit :
1. Sélectionnez la plage que vous souhaitez arrondir à l’entier pair.
2. Cliquez sur Kutools > Arrondir.
3. Dans la boîte de dialogue Arrondi sans utiliser de formule, saisissez le nombre de décimales souhaité, puis choisissez l’option Arrondir à l’entier pair sous la section Option. Vous pouvez prévisualiser le résultat dans le volet de prévisualisation. Voir la capture d’écran :
4. Cliquez ensuite sur OK ou sur Appliquer. Tous les nombres seront arrondis à l’entier pair avec 2 décimale(s).
Cliquez sur « Arrondir à l’entier pair » pour découvrir cette fonctionnalité en détail.
Article associé :
Meilleurs outils de productivité Office
Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre productivité et Gagner du temps.Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et rend votre travail bien plus facile
- Activez l’édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50 % et vous fait économiser des centaines de clics de souris chaque jour !
Tous les compléments Kutools. Un seul installateur
Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.
- Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
- Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
- Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
- Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
- Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels