Hoe ga je naar de eerste of laatste lege rij in Excel?
Het is tijdrovend om te scrollen en naar de eerste of laatste lege rij te gaan terwijl je aan een enorm werkblad werkt. In dit artikel introduceer ik enkele trucs om snel naar de eerste of laatste lege rij in Excel te gaan.
Ga naar de eerste of laatste lege rij met VBA
Ga naar de laatste lege rij of kolom met de Selecteer Laatste Rij functie
Ga naar de eerste of laatste lege rij met VBA
Hier zijn twee VBA-scripts die je kunnen helpen om snel naar de eerste of laatste lege rij in het actieve werkblad te gaan. Volg onderstaande stappen.
1. Druk op Alt + F11 om Microsoft Visual Basic for Applications venster te openen. Zie screenshot:
2. Klik vervolgens op Invoegen > Module en plak de onderstaande code in het script. Zie screenshot:
VBA: Ga naar de eerste lege rij.
Sub Findfirstblankcell()
'UpdatebyExtendoffice20170712
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
If Rng.Value = "" Then
MsgBox "No Value, in " & Rng.Address
End If
Next
End Sub |
 |
3. Druk op F5 om de code uit te voeren, en er verschijnt een dialoogvenster waarin je wordt gevraagd een bereik te selecteren om mee te werken. Zie screenshot:
4. Klik op OK. Er verschijnt een dialoogvenster dat je eraan herinnert wat de celreferentie van de eerste lege rij is. Zie screenshot:
5. Klik op OK herhaaldelijk om het Microsoft Excel dialoogvenster te sluiten. Ga vervolgens naar het Naam vak, typ A2 in, druk op Enter toets, en je gaat naar de eerste lege rij. Zie screenshot:
Tip: Als je naar de laatste lege rij wilt gaan, gebruik dan onderstaande VBA-code. Nadat je op de F5-toets hebt gedrukt, gaat de cursor direct naar de laatste lege rij.
VBA: Ga naar de laatste lege rij
Sub selectlastemptyrow()
Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Select
End SubOpmerking: Deze VBA zal de laatste lege cel in kolom A selecteren. Om de laatste lege cel in een andere kolom te selecteren, verander dan 1 in de code Cells(Rows.Count, 1) naar een ander nummer.
Ga naar de laatste lege rij of kolom met de Selecteer Laatste Rij functie
Als je snel naar de laatste lege rij of kolom wilt gaan, kun je de Last Row of Last Column functie van Kutools voor Excel gebruiken. Met deze tools kun je snel naar de laatste niet-lege cel van de laatste rij of kolom in het huidige werkblad gaan, en de volgende cel is dan de laatste lege rij of kolom.
Nadat je Kutools voor Excel hebt geïnstalleerd, doe dan het volgende:
Klik op Kutools > Selecteer > Selecteer Laatste Cel > Last Row/Last Column. Zie screenshot:
De laatste niet-lege cellen in de laatste rij (of kolom) worden geselecteerd. Druk gewoon op de pijl-omlaagtoets (of pijl-rechtoets) om de laatste lege rij (of kolom) te activeren.
Gerelateerde Artikelen
- Hoe loop je door rijen totdat een lege cel in een Excel-kolom?
- Hoe tel je zonder nullen of lege cellen in Excel?
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen