Hoe een hele kolom optellen behalve de koptekst/eerste rij in Excel?

Er staat een lange lijst met waarden in uw werkblad, en soms voegt u enkele waarden toe aan of verwijdert u ze uit deze lijst. Hoe kunt u automatisch de totale som ervan berekenen in de eerste cel? Nu moet u de hele kolom optellen, behalve de koptekst of de eerste rij in Excel.

Hele kolom optellen behalve koptekst met formule in Excel

Hele kolom optellen behalve koptekst met functie in Excel

Hele kolom optellen behalve koptekst met formule in Excel

In Excel is het gebruik van een formule een goede en eenvoudige keuze voor de meeste gebruikers.

In Excel 2007/2010/2013 typt u deze formule =SOM(A2:A1048576) (A is de kolom die u wilt optellen) in de eerste cel van uw lijst, en drukt u vervolgens op de Enter-toets op het toetsenbord. U ziet dat de totale som van de lijst wordt weergegeven in de eerste cel en automatisch verandert als de lijst verandert.

Tip: In Excel 2003 kunt u deze formule gebruiken =SOM(A2:A655366).

Hele kolom optellen behalve koptekst met functie in Excel

Het gebruik van een functie kan ook de hele kolom optellen, behalve de kopteksten in Excel.

1. Selecteer een cel van de kolom die u wilt selecteren en druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen.

2. Klik in het pop-upvenster op Invoegen > Module, en plak vervolgens de volgende VBA-code in de module.

VBA: Alleen nummer extraheren

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. Sla de code op en sluit het venster, typ vervolgens deze formule =SomKolom(A1) (A1 is de eerste cel in de lijstkolom) in de eerste cel van de lijstkolom, druk op de Enter-toets, en dan wordt de lijst, behalve de koptekst, opgeteld.

Tip: Als u de waarden in de lijst wijzigt, moet u de totale som van de lijstkolom vernieuwen door dubbel te klikken op de formulecel (in ons geval is het Cel A1) en op de Enter-toets te drukken.

Gerelateerd artikel:

• Selecteer hele kolom behalve koptekst/eerste rij in Excel