Comment compter ou additionner les cellules barrées dans Excel ?
Dans Excel, il est courant d’appliquer un formatage barré à certaines cellules pour marquer des données comme obsolètes, non pertinentes ou invalides. Cet indicateur visuel simplifie grandement la gestion des données et vous permet de vous concentrer sur les informations essentielles lors de vos analyses. Toutefois, lorsque vous effectuez des calculs — comme compter ou additionner — vous pouvez avoir besoin de distinguer les cellules barrées des autres. Maîtriser ces scénarios optimise votre flux de travail et améliore la précision de vos analyses. Cet article présente plusieurs méthodes pratiques pour compter et additionner les cellules avec ou sans formatage barré dans Excel, grâce à des fonctions VBA personnalisables offrant une flexibilité maximale selon vos besoins en gestion de données.
Compter les cellules barrées avec VBA dans Excel
Compter les cellules non barrées avec VBA dans Excel
Additionner en excluant les cellules barrées avec VBA dans Excel
Compter ou additionner les cellules barrées à l’aide de Kutools pour Excel
Compter les cellules barrées dans Excel
Si vous souhaitez déterminer le nombre total de cellules barrées dans une plage spécifique, sachez qu’Excel ne propose aucune fonction intégrée à cet effet : aucune formule standard ne détecte le formatage du texte, comme le barré. La solution la plus efficace consiste alors à recourir à une fonction définie par l’utilisateur (UDF) en VBA. Cette méthode s’avère particulièrement utile pour gérer des listes de tâches, des mises à jour d’inventaire ou tout autre cas où le barré signale des éléments terminés, invalides ou obsolètes.
1. Maintenez enfoncées les touches ALT + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Dans la fenêtre VBA, cliquez sur Insertion > Module pour créer un nouveau module, puis collez le code suivant dans la fenêtre du module.
Code VBA : Compter les cellules barrées
Public Function CountStrike(pWorkRng As Range) As Long
'Update 20140819
Application.Volatile
Dim pRng As Range
Dim xOut As Long
xOut = 0
For Each pRng In pWorkRng
If pRng.Font.Strikethrough Then
xOut = xOut + 1
End If
Next
CountStrike = xOut
End Function
3. Après avoir saisi le code, enregistrez votre classeur (afin de conserver la macro), fermez l’éditeur VBA, puis revenez à votre feuille de calcul. Dans n’importe quelle cellule vide où vous souhaitez afficher le résultat, saisissez la formule suivante (par exemple, pour compter les cellules barrées dans la plage)A2:B14) : =CountStrike(A2:B14)
Astuce : Vous pouvez remplacer A2:B14 par toute autre plage que vous souhaitez analyser.
4. Appuyez sur la touche Entrée pour exécuter la formule, et Excel affichera immédiatement le nombre de cellules barrées dans la plage limitée. Vous pourrez ainsi suivre efficacement l’avancement ou supprimer les entrées obsolètes si nécessaire. Voir la capture d’écran :
Précaution : Pour garantir la disponibilité future de ce code VBA, enregistrez impérativement le fichier au format .xlsm (classeur Excel prenant en charge les macros).
Compter les cellules non barrées dans Excel
Il arrive que vous ayez besoin de compter uniquement les cellules qui n’ont pas le formatage barré dans une plage donnée. Par exemple, dans les tableaux de suivi de projets ou les données de ventes, vous souhaitez souvent ne compter que les entrées actives ou valides — c’est-à-dire celles sans texte barré — afin de réaliser des opérations supplémentaires. Or, les fonctions COUNT et COUNTA d’Excel ignorent totalement le formatage du texte ; une solution VBA personnalisée s’impose donc pour un contrôle précis répondant exactement à ce besoin.
1. Appuyez sur ALT + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Allez dans Insertion > Module pour ajouter un nouveau module de code. Collez le code suivant dans cette fenêtre de module.
Code VBA : Compter les cellules non barrées
Public Function CountNoStrike(pWorkRng As Range) As Long
'Update 20140819
Application.Volatile
Dim pRng As Range
Dim xOut As Long
xOut = 0
For Each pRng In pWorkRng
If Not pRng.Font.Strikethrough Then
xOut = xOut + 1
End If
Next
CountNoStrike = xOut
End Function
3. Enregistrez votre classeur prenant en charge les macros, retournez à la feuille de calcul et, dans une cellule vide, saisissez la formule suivante (par exemple, pour la plage)A2:B14) : =countnostrike(A2:B14). Appuyez ensuite sur Entrée pour obtenir le résultat. Excel comptera uniquement les cellules de la plage sélectionnée qui ne possèdent pas de formatage barré.
Remarque : Dans l’exemple ci-dessus, A2:B14 est la plage de cellules évaluée. Ajustez la référence de plage selon les besoins de votre feuille de calcul. Veillez également à ce que les cellules fusionnées ou d’autres formats spéciaux n’affectent pas les résultats – assurez-vous que votre plage contient uniquement les cellules souhaitées.
Additionner en excluant les cellules barrées dans Excel
Lorsque vous travaillez avec des données numériques comprenant des entrées inactives ou à ignorer (c’est-à-dire barrées), il est souvent essentiel de n’additionner que les nombres valides. Cette situation est courante dans les feuilles budgétaires, la gestion des stocks ou le suivi des tâches, où les éléments barrés représentent des données obsolètes ou terminées qu’il convient d’exclure des totaux. Or, la fonction SOMME intégrée d’Excel ne fait aucune distinction entre les cellules formatées et les autres — une fonction VBA personnalisée s’impose donc pour réaliser cette opération avec précision.
1. Appuyez sur les touches ALT + F11 pour ouvrir l’éditeur Microsoft Visual Basic pour Applications.
2. Cliquez sur Insertion > Module pour ajouter un module, puis collez le code ci-dessous dans cette fenêtre.
Code VBA : Additionner en excluant les cellules barrées
Public Function ExcStrike(pWorkRng As Range) As Long
'Update 20140819
Application.Volatile
Dim pRng As Range
Dim xOut As Long
xOut = 0
For Each pRng In pWorkRng
If Not pRng.Font.Strikethrough Then
xOut = xOut + pRng.Value
End If
Next
ExcStrike = xOut
End Function
3. Fermez l’éditeur VBA. Dans votre feuille cible, sélectionnez une cellule vide et saisissez la formule suivante (par exemple, pour la plage)B2:B14) : =excstrike(B2:B14). Appuyez sur Entrée, et Excel additionnera uniquement les cellules de votre plage spécifiée qui n’ont pas de formatage barré, fournissant instantanément une somme excluant les valeurs obsolètes.
Remarque : remplacez B2:B14 par votre plage de données réelle. Cette fonction ignore les cellules barrées, quelles que soient leurs valeurs. Si vous obtenez des résultats inattendus, vérifiez que toutes les cellules contiennent bien des valeurs numériques et qu’elles utilisent le bon format.
Astuce pratique : si vous devez actualiser le total après avoir modifié l’état barré d’une cellule, recalculez la feuille en appuyant sur la touche F9.
Compter ou additionner les cellules barrées à l’aide de Kutools pour Excel
Si vous souhaitez compter ou additionner uniquement les cellules au format barré, Excel ne propose pas de méthode intégrée pour le faire – mais Kutools pour Excel le rend facile grâce à sa fonctionnalité Filtre spécial.
1. Sélectionnez la colonne
Cliquez sur la colonne contenant les cellules barrées.
2. Ouvrez le filtre spécial
Accédez à l’onglet KUTOOLS PLUS, puis cliquez sur Filtre spécial > Filtrer les cellules avec une police barrée.
3. Confirmez le filtre
Une boîte de dialogue s’affiche, indiquant le nombre de cellules correspondant à la condition. Cliquez sur OK pour continuer.
4. Consultez les résultats
Les cellules barrées sont désormais filtrées et visibles. Sélectionnez la plage de filtrage : vous verrez immédiatement la somme, la moyenne et le décompte dans la barre d'état située en bas d’Excel.
✨Pourquoi utiliser Kutools ?
Kutools pour Excel propose plus de 300 fonctionnalités puissantes et intuitives, comme celle-ci, qui vous font gagner du temps et boostent votre productivité – sans aucune formule complexe ni code VBA à écrire.
Que vous filtriez par format, nettoyiez des données, combiniez des feuilles ou éditiez en lot, Kutools simplifie votre travail en quelques secondes.
Essayez Kutools pour Excel gratuitement pendant 30 jours et découvrez tout ce qui vous a manqué !
Articles associés :
Comment additionner ou compter les nombres en gras dans une plage de cellules sous Excel ?
Comment compter et additionner des cellules en fonction de leur couleur de fond dans Excel ?
Comment compter ou additionner des cellules en fonction de la couleur de leur police dans Excel ?
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