Hoe selecteer ik niet-lege cellen in een bereik in Excel?
Laten we zeggen dat er veel niet-aangrenzende lege cellen in een bereik bestaan, en nu moet u momenteel alle cellen met inhoud selecteren. Hoe eenvoudig alle niet-lege cellen in Excel eenvoudig selecteren? Er zijn verschillende trucs om het op te lossen.
- Selecteer niet-lege cellen in een bereik met de functie Ga naar speciaal
- Selecteer niet-lege cellen in een bereik met VBA
- Selecteer niet-lege cellen in een bereik met Kutools voor Excel (slechts één stap)
Selecteer niet-lege cellen in een bereik met de functie Ga naar speciaal
De functie Ga naar speciaal kan ons helpen om niet-lege cellen in een geselecteerd bereik te selecteren met de volgende stappen.
1. Selecteer het bereik waaruit u alle niet-lege cellen wilt selecteren en druk op F5 Sleutel om het dialoogvenster Ga naar te openen. Klik vervolgens op het special om het dialoogvenster Ga naar speciaal te openen.
Note: U kunt ook het Ga naar speciaal dialoogvenster rechtstreeks door op het te klikken Home > Zoek en selecteer > Ga naar speciaal.
2. Vink in het dialoogvenster Ga naar speciaal het constanten keuze, Aantallen keuze, Tekst keuze, Logica's optie, en fouten optie en klik op de OK knop.
Nu ziet u dat alleen niet-lege cellen met inhoud zijn geselecteerd in het opgegeven bereik. Zie onderstaande screenshots:
Eén klik om alle niet-lege cellen in een bereik in Excel te selecteren
Kutools voor Excel's Selecteer niet-lege cellen hulpprogramma kan u helpen snel alle niet-lege cellen uit een geselecteerd bereik te selecteren met slechts één klik.
Selecteer niet-lege cellen in een bereik met VBA
Hier bieden we een VBA-macro voor het selecteren van alle niet-lege cellen uit een opgegeven bereik. Ga als volgt te werk:
1. druk de anders + F11 -toetsen om het venster Microsoft Visual Basic for Applications te openen.
2. Klik op de Invoegen > Moduleen plak vervolgens de volgende VBA-code in het openingsmodulevenster.
VBA: selecteer niet-lege cellen uit een bereik
Sub SelectNonBlankCells()
Dim Rng As Range
Dim OutRng As Range
Dim InputRng As Range
Dim xTitle As String
On Error Resume Next
xTitle = Application.ActiveWindow.RangeSelection.Address
Set InputRng = Application.InputBox("Range :", "KutoolsforExcel", xTitle, Type:=8)
Set InputRng = Application.Intersect(InputRng, Application.ActiveSheet.UsedRange)
For Each Rng In InputRng
If Not Rng.Value = "" Then
If OutRng Is Nothing Then
Set OutRng = Rng
Else
Set OutRng = Application.Union(OutRng, Rng)
End If
End If
Next
If Not (OutRng Is Nothing) Then
OutRng.Select
End If
End Sub
3. druk de F5 toets of klik op de lopen knop om deze VBA uit te voeren.
4. Geef in het openingsdialoogvenster het bereik op waarin u alleen niet-lege cellen wilt selecteren en klik op OK knop.
Nu worden alle niet-lege cellen onmiddellijk in het opgegeven bereik geselecteerd.
Selecteer niet-lege cellen in een bereik met Kutools voor Excel
Kutools voor Excel's Selecteer niet-lege cellen hulpprogramma stelt u in staat om alle niet-lege cellen uit een bepaald bereik met slechts één klik te selecteren.
Kutools for Excel - Verpakt met meer dan 300 essentiële tools voor Excel. Geniet van een GRATIS proefperiode van 30 dagen zonder creditcard! Download nu!
Selecteer het bereik waarin u alleen niet-lege cellen wilt selecteren en klik op de Kutools > kies > Selecteer niet-lege cellen.
Nu worden alle niet-lege cellen in het opgegeven bereik in één keer geselecteerd.
Kutools for Excel - Geef Excel een boost met meer dan 300 essentiële tools. Geniet van een GRATIS proefperiode van 30 dagen zonder creditcard! Snap het nu
Demo: selecteer niet-lege cellen in een bereik in Excel
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!