Comment additionner une colonne entière tout en excluant l’en-tête ou la première ligne dans Excel ?

Vous disposez d’une longue liste de valeurs dans votre feuille de calcul, et vous y ajoutez ou supprimez parfois des éléments. Comment faire pour additionner automatiquement leur total dans la première cellule ? Vous devez maintenant additionner Colonne entière en excluant l’en-tête ou la première ligne dans Excel.
Additionner Colonne entière en excluant l’en-tête à l’aide d’une formule dans Excel
Additionner Colonne entière en excluant l’en-tête à l’aide d’une fonction dans Excel
Additionner Colonne entière en excluant l’en-tête à l’aide d’une formule dans Excel
Dans Excel, recourir à une formule s’impose comme un choix simple et efficace pour la plupart des utilisateurs.
Dans Excel 2007/2010/2013, saisissez cette formule =SOMME(A2:A1048576) (A étant la colonne que vous souhaitez additionner) dans la première cellule de votre liste, puis appuyez sur la touche Entrée du clavier. Le total de la liste s’affiche alors automatiquement dans cette cellule et se met à jour dès que la liste est modifiée.
Astuce : Dans Excel 2003, vous pouvez utiliser cette formule =SOMME(A2:A65536).
Additionner Colonne entière en excluant l’en-tête à l’aide d’une fonction dans Excel
L’utilisation d’une fonction permet également d’additionner une colonne entière tout en excluant les en-têtes dans Excel.
1. Sélectionnez une cellule de la colonne que vous souhaitez traiter, puis appuyez sur Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Dans la fenêtre qui s’ouvre, cliquez sur Insertion > Module, puis collez le code VBA suivant dans le module.
VBA : Extraire uniquement les nombres
Public Function SumColumn(pRng As Range) As Double
'Updateby20140510
Dim xColIndex As Integer
Dim xRowIndex As Integer
Dim ws As Worksheet
Set pRng = pRng.Columns(1)
Set ws = pRng.Parent
xIndex = pRng.Column
xRowIndex = ws.Cells(Rows.Count, xIndex).End(xlUp).Row
Set pRng = ws.Range(ws.Cells(2, xIndex), ws.Cells(xRowIndex, xIndex))
SumColumn = Application.WorksheetFunction.Sum(pRng)
End Function 3. Enregistrez le code et fermez cette fenêtre, puis saisissez cette formule =SumColumn(A1) (A1 étant la première cellule de la colonne concernée) dans la première cellule de la colonne, appuyez sur la touche Entrée, et la somme de la liste — à l’exclusion de l’en-tête — sera automatiquement calculée.
Astuce : Si vous modifiez les valeurs de la liste, actualisez le total de la colonne en double-cliquant sur la cellule contenant la formule (dans notre exemple, la cellule A1), puis en appuyant sur la touche Entrée.
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