Ga naar hoofdinhoud

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 nu het volledige gratis 30-daagse gratis parcours van Kutools voor Excel!


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 (30 dagen) van dit hulpprogramma wilt, 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 ...

Beste Office-productiviteitstools

🤖 Kutools AI-assistent: Een revolutie teweegbrengen in de data-analyse op basis van: Intelligente uitvoering   |  Genereer code  |  Aangepaste formules maken  |  Analyseer gegevens en genereer grafieken  |  Roep Kutools-functies aan...
Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

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...

Omschrijving


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!
Comments (16)
Rated 4.5 out of 5 · 2 ratings
This comment was minimized by the moderator on the site
Thanks for sharing, it works wonderful, thank you!
Rated 4.5 out of 5
This comment was minimized by the moderator on the site
Thanks for the formula..it helped
Rated 4.5 out of 5
This comment was minimized by the moderator on the site
I've used this technique and had an issue when trying to copy the bold data. It only copies some of the data for some reason. Is there any way of copying only the bold data using this technique? Thanks, Richard
This comment was minimized by the moderator on the site
Dear richard skins,



We didn't encounter the problem as you mentioned. Would you please provide a screenshot with details of your operation?



Thank you for your comment!
This comment was minimized by the moderator on the site
Hi, I'm a complete excel novice, i've done the following technique but now need to copy the data which is bold/true. When I have tried to do this is won't copy what is highlighted. Any ideas on how I can copy the data? Thanks, Richard
This comment was minimized by the moderator on the site
@RICHARD Can u please provide any screenshot of your spreadsheet showing what u are exactly trying to do?
This comment was minimized by the moderator on the site
Thanks for sharing. It works wonderful.
This comment was minimized by the moderator on the site
Hi I am using this code and its working fine but whenever I click on cancel the dialogue box a popup window appear and shows some error. Can you please tell me how to remove that error. :Sub FilterBold() Dim myRange As Range Set myRange = Application.InputBox(Prompt:="Please Select a Range", Title:="InputBox Method", Type:=8) myRange.Select Application.ScreenUpdating = False For Each myRange In Selection If myRange.Font.Bold = False Then myRange.EntireRow.Hidden = True End If Next myRange Application.ScreenUpdating = True End Sub
This comment was minimized by the moderator on the site
Dear Nitin Jain,

Sorry to reply so late!

We have found the proble and fixed it already. The VBA script in the article is now updated,

Thank you for your comment!
This comment was minimized by the moderator on the site
Simple and brilliant, thank you!
This comment was minimized by the moderator on the site
This worked perfectly, thank you!!! :D :lol:
This comment was minimized by the moderator on the site
I presume that column A is the reference Column with Bold cells. I create a Name "Bold?" with the refer to as below =GET.CELL(20,OFFSET(INDIRECT("A1"),ROW()-1,0)) In column B, I type: =Bold? Copy down the formula and then use autofilter to filter the value TRUE. DONE
This comment was minimized by the moderator on the site
@cadafi ur formula works fine but it is not the optimised or efficient use of it. Rather we should use direct reference of the range or a cell in place of that complete offset command. Like the one as follows: =GET.CELL(20,'Sheet1'!A1) Copy down the formula and then use autofilter to filter the value TRUE. DONE
This comment was minimized by the moderator on the site
Thanks Mohamand Faizan. You are entirely correct.
This comment was minimized by the moderator on the site
@Mohammad Faizan You are entirely correct. Thanks.
This comment was minimized by the moderator on the site
@Cadafi.... thats brilliant... wondering how it works though!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations