Note: The other languages of the website are Google-translated. Back to English

Hoe cellen filteren op vetgedrukte tekens in Excel?

U kunt de vetgedrukte lettertypestijl toepassen om de gegevens of inhoud in cellen in Excel op te maken, maar weet u hoe u cellen filtert op de cellen met een vetgedrukte lettertypestijl in Excel? Dit artikel verzamelt verschillende lastige VBA-macro's om cellen in Excel op vetgedrukte tekens te filteren.

Filter vetgedrukte cellen met de hulpkolom
Filter vetgedrukte cellen met de VBA-code
Filter eenvoudig vetgedrukte cellen met een geweldige tool
Meer tutorials voor gegevensfiltering ...


Filter vetgedrukte cellen met de help-kolom

Stel dat u alle vetgedrukte cellen in kolom B moet filteren zoals hieronder afgebeeld, doe dan als volgt:

De onderstaande door de gebruiker gedefinieerde functie helpt om te bepalen of een cel in een kolom vet is of niet, en retourneert vervolgens de resultaten als WAAR of ONWAAR in een hulpkolom. U kunt alle TRUE-resultaten filteren om alleen de vetgedrukte cellen in kolom B weer te geven.

1. druk de anders + F11 toetsen om de te openen Microsoft Visual Basic voor toepassing venster.

2. In de Microsoft Visual Basic voor toepassing venster klikt Invoegen > module, kopieer vervolgens de volgende VBA-code naar het modulevenster. Zie screenshot:

VBA-code: filter cellen op vetgedrukte tekens

Function IsBold(rCell As Range)
IsBold = rCell.Font.Bold
End Function

3. druk de anders + Q toetsen om het codevenster te sluiten.

4. Selecteer een lege cel die aan de tabel grenst (de geselecteerde cel moet zich in dezelfde rij van de eerste rij in de filtertabel bevinden), kopieer de onderstaande formule erin en druk op de invoeren sleutel.

= IsBold (B2)

5. Blijf de eerste resultatencel selecteren en sleep de vulhendel om alle resultaten te krijgen. Zie screenshot:

6. Selecteer de koptekst van de hulpkolom en klik op Data > Filter. Klik op de pijlknop naast de koptekstcel, vink het TRUE box en klik vervolgens op OK.

Nu worden alle vetgedrukte cellen in kolom B uitgefilterd zoals onderstaand screenshot laat zien.


Filter snel vetgedrukte cellen in een kolom met meerdere klikken in Excel:

De Filter vetgedrukte cellen nut van Kutools for Excel kan u helpen om snel alle vetgedrukte cellen in een bepaalde kolom met enkele klikken te filteren, zoals de onderstaande demo laat zien.
Download de volledige functie 30-dag gratis proefversie van Kutools voor Excel nu!


Filter vetgedrukte cellen met de VBA-code

Met de onderstaande VBA-code kunt u alle vetgedrukte cellen rechtstreeks in één kolom filteren. Ga als volgt te werk.

1. Selecteer het kolombereik waarin u alle vetgedrukte cellen wilt filteren, behalve de koptekstcel. In dit geval selecteer ik B2: B16.

2. druk de anders + F11 toetsen om de te openen Microsoft Visual Basic voor toepassing venster.

3. In de Microsoft Visual Basic voor toepassing venster klikt Invoegen > module, kopieer en plak vervolgens de volgende VBA-code in het modulevenster.

VBA-code: filter vetgedrukte cellen in een kolom

Sub FilterBold()
'Updated by Extendoffice 20191018
Dim cell As Range
For Each cell In Selection
If cell.Font.Bold = False Then
cell.EntireRow.Hidden = True
End If
Next cell
End Sub

4. druk de F5 toets om deze macro uit te voeren. Vervolgens worden alle vetgedrukte cellen onmiddellijk in het geselecteerde kolombereik gefilterd.


Filter eenvoudig vetgedrukte cellen met een geweldige tool

In deze sectie raden we u een handig hulpmiddel aan - de Filter vetgedrukte cellen nut van Kutools for Excel. Met dit hulpprogramma worden alle vetgedrukte cellen in de geselecteerde kolom onmiddellijk met enkele klikken gefilterd.

Voor het aanvragen Kutools for Excel, Dan kunt u download en installeer het eerst.

1. Selecteer het kolombereik waarin u de vetgedrukte cellen wilt filteren, klik op Koetools Plus> Speciaal filter > Filter vet om het voor elkaar te krijgen. Zie onderstaande demo:

  Als u een gratis proefperiode wilt hebben (30-dag) van dit hulpprogramma, klik om het te downloaden, en ga vervolgens de bewerking toepassen volgens de bovenstaande stappen.


Gerelateerde artikelen

Filter meerdere kolommen tegelijk in Excel
Na het filteren van één kolom met de filterfunctie, kunnen alleen EN-criteria worden toegepast op meer dan één kolom. Hoe zou u in dit geval zowel de EN- als de OF-criteria kunnen toepassen om meerdere kolommen tegelijk in het Excel-werkblad te filteren? De methoden in dit artikel kunnen u een plezier doen.

Filter of selecteer cellen op celkleur in Excel
Normaal gesproken kunt u cellen met verschillende kleuren vullen voor elk doel in Excel. Als je een werkblad hebt met verschillende kleuren om verschillende soorten inhoud aan te duiden en je wilt die cellen filteren of selecteren op celkleur, dan kun je dit misschien doen met de methoden in dit artikel.

Plak het overslaan van verborgen / gefilterde cellen en rijen in Excel
U hebt bijvoorbeeld een tabel in Excel gefilterd, maar nu moet u een bereik kopiëren en in deze gefilterde tabel plakken, weet u hoe u moet plakken en de verborgen / gefilterde cellen en rijen overslaan? Verschillende eenvoudige manieren in dit artikel kunnen u helpen.

Filter rijen op basis van een lijstselectie in een ander blad
In Excel filteren we rijen meestal op basis van een criterium, maar als er twee lijsten zijn, een in Sheet1 en een andere in Sheet2, zou je dan trucjes kunnen hebben om snel rijen in Sheet1 te filteren op basis van de lijst in Sheet2? Hier introduceert dit artikel de manieren om deze taak op te lossen.

Filter alle gerelateerde gegevens uit samengevoegde cellen in Excel
Stel dat er een kolom met samengevoegde cellen in uw gegevensbereik is, en nu moet u deze kolom filteren met samengevoegde cellen om alle rijen weer te geven die gerelateerd zijn aan elke samengevoegde cel, zoals in de volgende schermafbeeldingen. In Excel kunt u met de filterfunctie alleen het eerste item filteren dat aan de samengevoegde cellen is gekoppeld, in dit artikel hebben we het over hoe u alle gerelateerde gegevens uit samengevoegde cellen in Excel kunt filteren.

Meer tutorials voor gegevensfiltering ...


De beste tools voor kantoorproductiviteit

Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%

  • visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
  • Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
  • Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
  • Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
  • Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2021 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Volledige functies Gratis proefperiode van 30 dagen. 60 dagen geld-terug-garantie.
kte tabblad 201905

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!
officetab onderkant
Heb je vragen? Stel ze hier. (15)
Rated 4.5 uit 5 · 1 ratings
Deze opmerking is gemaakt door de moderator op de site
Ik neem aan dat kolom A de referentiekolom is met vetgedrukte cellen. Ik maak een naam "Vet?" met de verwijzing naar zoals hieronder =GET.CELL(20,OFFSET(INDIRECT("A1"),RIJ()-1,0)) In kolom B typ ik: =Bold? Kopieer de formule en gebruik vervolgens autofilter om de waarde TRUE te filteren. KLAAR
Deze opmerking is gemaakt door de moderator op de site
@Cadafi .... dat is briljant ... ik vraag me af hoe het werkt!
Deze opmerking is gemaakt door de moderator op de site
@cadafi uw formule werkt prima, maar het is niet het geoptimaliseerde of efficiënte gebruik ervan. We zouden eerder een directe verwijzing naar het bereik of een cel moeten gebruiken in plaats van dat volledige offset-commando. Zoals de volgende: =GET.CELL(20,'Sheet1'!A1) Kopieer de formule en gebruik vervolgens autofilter om de waarde TRUE te filteren. KLAAR
Deze opmerking is gemaakt door de moderator op de site
@Mohammad Faizan Je hebt helemaal gelijk. Bedankt.
Deze opmerking is gemaakt door de moderator op de site
Bedankt Mohamand Faizan. Je hebt helemaal gelijk.
Deze opmerking is gemaakt door de moderator op de site
Dit werkte perfect, bedankt!!! :D :lol:
Deze opmerking is gemaakt door de moderator op de site
Eenvoudig en briljant, bedankt!
Deze opmerking is gemaakt door de moderator op de site
Hallo, ik gebruik deze code en het werkt prima, maar wanneer ik klik op het dialoogvenster annuleren, verschijnt er een pop-upvenster met een fout. Kunt u mij vertellen hoe u die fout kunt verwijderen. :Sub FilterBold() Dim myRange As Range Set myRange = Application.InputBox(Prompt:="Selecteer een bereik", Title:="InputBox Method", Type:=8) myRange.Select Application.ScreenUpdating = False voor elke myRange In Selectie Als myRange.Font.Bold = False Dan myRange.EntireRow.Hidden = True End If Next myRange Application.ScreenUpdating = True End Sub
Deze opmerking is gemaakt door de moderator op de site
Beste Nitin Jain,

Sorry dat ik zo laat reageer!

We hebben het probleem gevonden en al opgelost. Het VBA-script in het artikel is nu bijgewerkt,

Bedankt voor je reactie!
Deze opmerking is gemaakt door de moderator op de site
Bedankt voor het delen. Het werkt wonderbaarlijk.
Deze opmerking is gemaakt door de moderator op de site
Hallo, ik ben een complete beginner in Excel, ik heb de volgende techniek gedaan, maar moet nu de gegevens kopiëren die vet/waar zijn. Wanneer ik heb geprobeerd dit te doen, wordt niet gekopieerd wat is gemarkeerd. Enig idee hoe ik de gegevens kan kopiëren? Bedankt, Richard
Deze opmerking is gemaakt door de moderator op de site
@RICHARD Kunt u een screenshot van uw spreadsheet geven die laat zien wat u precies probeert te doen?
Deze opmerking is gemaakt door de moderator op de site
Ik heb deze techniek gebruikt en had een probleem bij het kopiëren van de vetgedrukte gegevens. Het kopieert slechts een deel van de gegevens om de een of andere reden. Is er een manier om alleen de vetgedrukte gegevens te kopiëren met deze techniek? Bedankt, Richard
Deze opmerking is gemaakt door de moderator op de site
Beste richard skins,



We hebben het probleem niet ondervonden zoals je zei. Zou je een screenshot willen maken met details van je operatie?



Bedankt voor je reactie!
Deze opmerking is gemaakt door de moderator op de site
Bedankt voor de formule..het heeft geholpen
Rated 4.5 uit 5
Er zijn nog geen reacties geplaatst
Laat uw commentaar
Posten als gast
×
Beoordeel dit bericht:
0   Personages
Voorgestelde locaties

Volg ons

Copyright © 2009 - www.extendoffice.com. | Alle rechten voorbehouden. Aangedreven door ExtendOffice. | Sitemap
Microsoft en het Office-logo zijn handelsmerken of gedeponeerde handelsmerken van Microsoft Corporation in de Verenigde Staten en / of andere landen.
Beschermd door Sectigo SSL