Note: The other languages of the website are Google-translated. Back to English
English English

Comment additionner / compter les nombres en gras dans une plage de cellules dans Excel?

Lorsque vous avez une plage de données qui contient des nombres en gras dans une feuille de calcul et que vous souhaitez maintenant additionner ou compter uniquement les cellules en gras, vous pouvez bien sûr les additionner une par une manuellement, mais cela prendra du temps. Comment pouvez-vous additionner ou compter uniquement les cellules en gras dans Excel de manière simple et rapide?

Compter les nombres en gras dans une plage avec la fonction définie par l'utilisateur (VBA et formule)
Somme des nombres en gras dans une plage avec la fonction définie par l'utilisateur (VBA et formule)
Plusieurs clics pour compter et additionner les cellules en gras dans une plage avec Kutools for Excel


Compter les nombres en gras dans une plage avec la fonction définie par l'utilisateur

Fonction définie par l'utilisateur peut vous aider à obtenir rapidement le nombre de cellules en gras. Veuillez faire comme ceci:

1. Maintenez le ALT + F11 clés, et il ouvre le Fenêtre Microsoft Visual Basic pour Applications.

2Cliquez sur insérer > Moduleet collez le code suivant dans le Fenêtre du module.

Code VBA: comptez les nombres en gras dans une plage de cellules

Function CountBold(WorkRng As Range)
'Update 20220516
Dim Rng As Range
Dim xCount As Double
For Each Rng In WorkRng
    If Rng.Font.Bold Then
        xCount = xCount + 1
    End If
Next
CountBold = xCount
End Function

3. Ensuite, enregistrez ce code et tapez cette formule = CountBold (A1: C9) dans une cellule vide, voir capture d'écran:

doc-count-bold-cells1

4. Puis appuyez Entrer et vous compterez les cellules en gras dans la plage A1: C9.

doc-count-bold-cells2

Remarque :A1: C9 dans la formule indique la plage dans laquelle vous souhaitez utiliser la fonction pour compter les cellules en gras, vous pouvez la modifier selon vos besoins.


Additionner les nombres en gras dans une plage avec la fonction définie par l'utilisateur

Et si vous souhaitez additionner uniquement les nombres en gras dans une plage de données, je peux également créer une fonction définie par l'utilisateur pour que vous puissiez la résoudre.

1. Maintenez la touche ALT + F11 clés, et il ouvre le Fenêtre Microsoft Visual Basic pour Applications.

2Cliquez sur insérer > Moduleet collez le code suivant dans le Fenêtre du module.

Code VBA: additionnez les nombres en gras dans une plage de cellules

Function SumBold(WorkRng As Range)
'Update 20220516
Dim Rng As Range
Dim xSum As Double
For Each Rng In WorkRng
    If Rng.Font.Bold Then
        xSum = xSum + Rng.Value
    End If
Next
SumBold = xSum
End Function

3. Ensuite, enregistrez ce code et tapez cette formule = sumbold (A1: C9) dans une cellule vide, voir capture d'écran:

doc-count-bold-cells3

4. Et puis appuyez sur Entrer clé, tous les nombres en gras de la plage A1: C9 ont été additionnés. Voir la capture d'écran:

doc-count-bold-cells4

Remarque :A1: C9 dans la formule indique la plage dans laquelle vous souhaitez utiliser la fonction pour additionner les cellules en gras, vous pouvez la modifier selon vos besoins.


Plusieurs clics pour compter et additionner les cellules en gras dans une plage avec Kutools for Excel

YVous pouvez facilement compter ou additionner toutes les cellules en gras dans une plage en plusieurs clics sans gérer le code VBA compliqué et sans mémoriser les formules.

Avant d'appliquer Kutools pour Excel, S'il vous plaît téléchargez et installez-le d'abord.

1. Pour compter les cellules en gras, sélectionnez une cellule vide pour localiser le résultat, puis cliquez sur Kutools > Fonctions Kutools > Statistiques et mathématiques > COUNTBYFONTBOLD.

Et pour additionner les cellules en gras, cliquez sur Kutools > Fonctions Kutools > Statistiques et mathématiques > SUMBYFONTBOLD. Voir la capture d'écran:

2. Dans le FArguments onction boîte de dialogue, spécifiez la plage avec les cellules en gras que vous devez compter ou additionner dans la zone Référence, puis cliquez sur le bouton OK .

Désormais, le comptage ou la somme de toutes les cellules en gras de la plage spécifiée sont remplis immédiatement dans la cellule sélectionnée. Voir la capture d'écran:

  Si vous souhaitez bénéficier d'un essai gratuit (30 jours) de cet utilitaire, veuillez cliquer pour le télécharger, puis passez à appliquer l'opération selon les étapes ci-dessus.


Gardez la référence de cellule de formule constante avec Kutools for Excel


Articles connexes:

Comment identifier et sélectionner toutes les cellules ou le texte en gras dans Excel?


Les meilleurs outils de productivité de bureau

Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%

  • Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtréeplus
  • Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammesplus
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellulesplus
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDFplus
  • Plus de 300 fonctionnalités puissantes. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Essai gratuit de 30 jours. Garantie de remboursement de 60 jours.
onglet kte 201905

Office Tab apporte une interface à onglets à Office et simplifie considérablement votre travail

  • Activer 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 réduit des centaines de clics de souris chaque jour!
bas de cabine
Commentaires (21)
Pas encore de notes. Soyez le premier à évaluer!
Ce commentaire a été minimisé par le modérateur sur le site
bonjour, j'utilise excel 2013 néerlandais avec kutools 6.5 mais je ne peux pas utiliser la mise en page de lecture. demander avant de crier être résolu dans cette version ???
Ce commentaire a été minimisé par le modérateur sur le site
[quote] bonjour, j'utilise excel 2013 néerlandais avec kutools 6.5 mais je ne peux pas utiliser la mise en page de lecture. demander avant de crier être résolu dans cette version ???Par kersten[/quote] Bonjour, S'il vous plaît contactez-moi à jaychivo#extendoffice.com. Veuillez remplacer # par @. :-)
Ce commentaire a été minimisé par le modérateur sur le site
Existe-t-il un moyen de compter en fonction de la couleur de la cellule si le texte est en gras ?
Ce commentaire a été minimisé par le modérateur sur le site
C'EST GÉNIAL !!!! Cela a parfaitement fonctionné !! Merci
Ce commentaire a été minimisé par le modérateur sur le site
Cela fonctionne parfaitement sauf qu'il ne semble pas ajouter mes décimales, mais ajoute seulement le dollar entier. Si vous avez une solution à ce problème, je vous en serais très reconnaissant.
Ce commentaire a été minimisé par le modérateur sur le site
Bonjour Katie, Utilisez le code ci-dessous, car la somme indique les décimales. Fonction SumBold(rng As Range) Dim rCell As Range Application.Volatile SumBold = 0 For Each rCell In rng If rCell.Font.Bold Then _ SumBold = SumBold + rCell Next End Function
Ce commentaire a été minimisé par le modérateur sur le site
Cela fonctionne un régal. Je n'ai qu'un seul problème... il ne semble rien ajouter après un point décimal. Toute aide serait grandement appréciée.
Ce commentaire a été minimisé par le modérateur sur le site
Merci.. ça marche...
Ce commentaire a été minimisé par le modérateur sur le site
J'ai copié et collé du code dans Excel mais j'ai #NAME ? Erreur. Je me suis assuré d'activer les macros et d'utiliser la version Excel 2010 (je ne sais pas si cela change quelque chose). Quelqu'un peut-il aider s'il vous plait?!
Ce commentaire a été minimisé par le modérateur sur le site
[quote]J'ai copié et collé du code dans Excel, mais j'obtiens #NAME ? Erreur. Je me suis assuré d'activer les macros et d'utiliser la version Excel 2010 (je ne sais pas si cela change quelque chose). Quelqu'un peut-il aider s'il vous plait?!Par Maey[/quote] Vous devez suivre les instructions. Il dit: "Cliquez sur Insérer> Module et collez le code suivant dans la fenêtre du module", et vous devez le faire exactement. Assurez-vous de coller le code dans la fenêtre du module, et non dans la fenêtre du code de la feuille.
Ce commentaire a été minimisé par le modérateur sur le site
J'utilise Excel pour Mac 2011. Comment puis-je exécuter le code sur mon système ? Merci!
Ce commentaire a été minimisé par le modérateur sur le site
RE : formule CountBold Cette formule ne semble pas être dynamique. Bien que cela fonctionne au premier passage, si je change les cellules en gras, les compteurs ne se mettent pas à jour à moins que je ne ressaisisse la formule. Des conseils ?
Ce commentaire a été minimisé par le modérateur sur le site
Oui c'est la même chose pour moi, sinon ça marche très bien. Mais si cela pouvait être résolu de manière à actualiser le décompte après chaque désélection de cellule, comme les autres décomptes de base, ce serait parfait!
Ce commentaire a été minimisé par le modérateur sur le site
Chers gars,
La formule ne sera pas mise à jour si vous modifiez simplement le format des cellules numériques.
Il se met à jour uniquement lorsque vous modifiez le contenu de la cellule.
Ce commentaire a été minimisé par le modérateur sur le site
Est-ce qu'il s'agit de ячейках числа и текст ? надо просуммировать только ячейки с числами жирным.
Ce commentaire a été minimisé par le modérateur sur le site
Ma se metto in grassetto nuove celle, la somma non si aggiorna !!!
Ce commentaire a été minimisé par le modérateur sur le site
Bonjour Carlo,

Gald pour aider. Après avoir mis en gras de nouvelles cellules, la somme ne sera pas mise à jour automatiquement. Mais lorsque vous double-cliquez sur la cellule de formule, puis appuyez sur Entrée, la somme sera mise à jour. Veuillez essayer.

Sincèrement,
Mandy
Ce commentaire a été minimisé par le modérateur sur le site
Salut Mandy,
Merci pour votre réponse,
Oui, je sais qu'après un double clic, la somme s'améliorera.
Existe-t-il un moyen de mettre à jour automatiquement la somme?

Cordialement
Carlo
Ce commentaire a été minimisé par le modérateur sur le site
Bonjour Carlo,

Désolé de ne pas avoir la solution pour mettre à jour automatiquement la somme. Le moyen le plus simple auquel je puisse penser est d'appuyer sur Ctrl + Alt + F9 pour recalculer toutes les feuilles de calcul dans tous les classeurs ouverts. Passez une bonne journée.

Sincèrement,
Mandy
Ce commentaire a été minimisé par le modérateur sur le site
J'utilise la fonction et je continue à recevoir le #NAME ? Erreur. J'utilise Excel 365 et Windows11.
Ce commentaire a été minimisé par le modérateur sur le site
Bonjour, Antoine

Avez-vous copié et collé le code dans le Module of Fenêtre Microsoft Visual Basic pour Applications dans votre feuille de travail? Après avoir collé le code, vous devez entrer la formule selon vos besoins.

Ou vous pouvez télécharger votre fichier ici, nous pouvons vérifier où se situe le problème.

Merci !
Il n'y a pas encore de commentaires postés ici
Laisser vos commentaires
Publier en tant qu'invité
×
Évaluez cet article:
0   Personnages
Emplacements suggérés