Hoe haalt u de eerste of laatste niet-lege cel op in een rij of kolom?
Tijdens dagelijks Excel-werk komt het vaak voor dat u datasets tegenkomt waarin slechts enkele cellen waarden bevatten, terwijl andere leeg zijn. Vaak moet u snel de allereerste of de allerlaatste gevulde cel in een bepaalde rij of kolom identificeren. Hoewel dit eenvoudig is bij een handvol gegevens, wordt handmatig zoeken in langere rijen of kolommen inefficiënt, tijdrovend en foutgevoelig.
Er zijn verschillende praktische manieren om efficiënt de waarde van de eerste of laatste niet-lege cel in een rij of kolom op te halen, waardoor u deze taak kunt automatiseren en kostbare tijd bespaart. Hieronder vindt u zowel op formules gebaseerde als andere praktische oplossingen die geschikt zijn voor verschillende realistische scenario’s, inclusief het omgaan met dynamische Bereik of grote datasets.
Haal de eerste niet-lege cel op in een rij of kolom met een formule
Haal de laatste niet-lege cel op in een rij of kolom met een formule
Haal de waarde van de eerste of laatste niet-lege cel op met een VBA-macro
Vind de eerste of laatste niet-lege cel met de filterfunctie van Excel
Haal de eerste niet-lege cel op in een rij of kolom met een formule
Om de eerste cel met gegevens uit een rij of kolom te halen, combineert u de functies INDEX en VERGELIJKEN. Deze aanpak is ideaal als u de waarde programmatisch wilt ophalen en uw werkblad dynamisch wilt houden wanneer de onderliggende gegevens veranderen. Zo werkt dat:
1. Voer in een lege cel naast uw gegevensbereik de volgende formule in:
=INDEX(A1:A13,MATCH(TRUE,INDEX((A1:A13<>0),0),0))Als uw gegevens zich bijvoorbeeld in de cellen A1 tot en met A13 bevinden, retourneert deze formule de eerste waarde die niet leeg is en niet nul. Zie het onderstaande voorbeeld:
2. Druk op de toets Enter. De waarde van de eerste cel in het bereik die niet leeg is (of niet nul, afhankelijk van de formulelogica) wordt als volgt weergegeven:
Opmerkingen & tips:
- In de bovenstaande formule kunt u A1:A13aanpassen om te verwijzen naar een willekeurige kolom of rij (bijvoorbeeld)1:1 voor rij 1, of B2:M2 voor een deel van een rij).
- Deze methode werkt betrouwbaar bij één enkele rij of kolom. Voor tabellen of bereiken met meerdere geselecteerde rijen of kolommen kunt u overwegen de formule per rij of kolom afzonderlijk toe te passen.
- Als de formule een foutmelding retourneert ()#N/B), controleer dan of uw bereik daadwerkelijk ten minste één niet-lege, niet-nulwaarde bevat.
- Vergeet niet dat u voor echte lege cellen („"),
0moet vervangen door""als u alleen lege cellen wilt negeren in plaats van nullen.
Ontgrendel de magie van Excel met KUTOOLS AI
- Slimme uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak grafieken — allemaal met eenvoudige opdrachten.
- aangepaste formules: Genereer op maat gemaakte formules om uw workflows te stroomlijnen.
- VBA-programmeren: Schrijf en implementeer VBA-code moeiteloos.
- Formule-uitleg: Begrijp complexe formules moeiteloos.
- Tekstvertaling: Doorbreek taalbarrières in uw spreadsheets.
Haal de laatste niet-lege cel op in een rij of kolom met een formule
Om de waarde uit de laatste niet-lege cel in een bepaald bereik op te halen, biedt een matrixgebaseerde VERT.ZOEKEN-formule een efficiënte en eenvoudige oplossing voor dynamische of veranderende gegevens. Ideaal om automatisch de meest recente vermelding in een lijst of samenvattende tabel te identificeren!
1. Typ de volgende formule in een lege cel naast uw doelbereik:
=LOOKUP(2,1/(A1:A13<>""),A1:A13)Deze formule scant het opgegeven bereik en retourneert de waarde van de laatste cel die niet leeg is. Bijvoorbeeld met A1:A13 als bereik:
2. Nadat u op Enter hebt gedrukt, berekent en toont Excel de waarde in de laatste niet-lege cel:
Opmerkingen & suggesties:
- U kunt deze formule gebruiken met elke enkele kolom of rij ()B1:B20, F8:F30 of 2:2, enz.). Pas de bereikverwijzing zo nodig aan.
- Als uw gegevens nullen bevatten die u wilt negeren, vervangt u
A1:A13""doorA1:A130. Let er echter op dat het onderscheid tussen echte lege cellen en nullen overeenkomt met uw bedoeling. - Deze aanpak werkt het beste voor eenvoudige bereiken. Voor bereiken met formules die „" (lege tekst) retourneren, beschouwt deze formule dergelijke cellen als leeg.
- Als alle cellen leeg zijn, geeft de formule een #N/B-foutmelding.
Haal de waarde van de eerste of laatste niet-lege cel op met een VBA-macro
Voor gebruikers die met grote datasets werken of herhalende taken willen automatiseren, kan een eenvoudige VBA-macro het proces aanzienlijk stroomlijnen—vooral bij variërende bereiken of wanneer deze veel rijen of kolommen bevatten. In tegenstelling tot formules voert VBA acties op verzoek uit, zoals het zoeken naar de eerste of laatste niet-lege cel, waardoor het ideaal is voor herhaalde bewerkingen over meerdere bereiken.
1. Open de VBA-editor via Ontwikkelaar > Visual Basic. Klik in het verschijnende VBA-venster op Invoegen > Module en plak een van de volgende procedures in het modulevenster:
Macro om de eersteniet-lege cel in een Bereik selecteren te vinden:
Sub FindFirstNonBlankCell()
Dim rng As Range
Dim cell As Range
Dim firstValue As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select range", xTitleId, rng.Address, Type:=8)
firstValue = ""
For Each cell In rng
If cell.Value <> "" Then
firstValue = cell.Value
Exit For
End If
Next cell
If firstValue <> "" Then
MsgBox "The first non blank cell value is: " & firstValue, vbInformation, xTitleId
Else
MsgBox "No non blank cells found.", vbExclamation, xTitleId
End If
End SubEvenzo is hier de code om de laatsteniet-lege cel te vinden:
Sub FindLastNonBlankCell()
Dim rng As Range
Dim cell As Range
Dim lastValue As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select range", xTitleId, rng.Address, Type:=8)
lastValue = ""
For Each cell In rng
If cell.Value <> "" Then
lastValue = cell.Value
End If
Next cell
If lastValue <> "" Then
MsgBox "The last non blank cell value is: " & lastValue, vbInformation, xTitleId
Else
MsgBox "No non blank cells found.", vbExclamation, xTitleId
End If
End Sub2. Klik op de knop Uitvoeren in de VBA-editor om de code uit te voeren. U wordt gevraagd het doelbereik te selecteren om naar niet-lege cellen te zoeken. Na uw selectie en bevestiging wordt in een dialoogvenster de waarde van de eerste of laatste niet-lege cel weergegeven, afhankelijk van welke macro u uitvoert.
2 . Klik op de knop Uitvoeren in de VBA-editor om de code uit te voeren. U wordt gevraagd het doelbereik te selecteren om naar niet-lege cellen te zoeken. Na uw selectie en bevestiging wordt in een dialoogvenster de waarde van de eerste of laatste niet-lege cel weergegeven, afhankelijk van welke macro u uitvoert.
- Deze macro’s zijn flexibel en werken naadloos met zowel rijen als kolommen, ongeacht de hoeveelheid gegevens.
- VBA stelt u in staat taken te automatiseren en herhaaldelijk uit te voeren, waardoor het perfect is voor frequente of grootschalige werkzaamheden.
- Zorg ervoor dat u uw werkmap opslaat en, indien nodig, macro’s inschakelt voordat u ze uitvoert. Test altijd eerst op voorbeeldgegevens om de nauwkeurigheid te controleren voordat u ze toepast op belangrijke gegevens.
Vind de eerste of laatste niet-lege cel met de filterfunctie van Excel
Voor gebruikers die snel visueel niet-lege waarden willen identificeren—vooral bij zeer grote gegevenskolommen—biedt de ingebouwde Filter-functie in Excel een krachtige oplossing om niet-lege vermeldingen in één oogopslag te markeren. Hoewel deze methode de waarde niet automatisch in een andere cel teruggeeft, is ze uiterst effectief voor controle en navigatie tijdens data-analyse.
Zo lokaliseert u visueel de eerste of laatste niet-lege cellen via filteren:
- Selecteer de kolom of rij met uw gegevens. Voor eenvoudiger filteren kunt u de hele kolom selecteren, bijvoorbeeld door op de kolomletter te klikken.
- Klik op het tabblad Gegevens en kies vervolgens Filter.
- Klik op het kleine filterpijltje in de koptekst van uw bereik of tabel.
- Schakel de optie (Lege cellen) uit, zodat alleen gevulde cellen zichtbaar blijven.
- Na het filteren is de eerste zichtbare waarde bovenaan de kolom uw eerste niet-lege cel; scroll naar beneden om de laatste te zien.
Voordelen: De filtermethode is razendsnel, vereist geen formules en werkt naadloos—zelfs bij kolommen met duizenden rijen.
Nadelen: De oplossing is uitsluitend visueel: het toont het resultaat niet in een cel en ondersteunt geen automatisering zoals formules of VBA. Toch is het perfect voor handmatige controles, reviews en interactieve gegevensverkenning.
Probleemoplossing & suggesties:
Als het filter niet lijkt te werken, controleer dan of u niet per ongeluk slechts een deel van uw gegevens hebt geselecteerd—want dat kan ertoe leiden dat het filter onjuist wordt toegepast. Verwijder filters na gebruik door te klikken op Gegevens > Wissen om uw volledige datasetweergave te herstellen.
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins