Hoe selecteert u alle cellen met formules in een werkblad?
Als uw werkblad verschillende soorten cellen bevat – zoals formules, tekst, getallen enzovoort – en u wilt alleen de cellen met formules markeren (in het hele werkblad of binnen een selectie), hoe doet u dat dan in Excel? Hieronder introduceer ik een aantal snelle methoden die u daarbij helpen.
Selecteer alle formulecellen met de functie Ga naar
Markeer alle formulecellen met VBA
Selecteer alle formulecellen met de functie Ga naar
In Excel kunt u de functie Ga naar gebruiken om snel formulecellen te selecteren in een werkblad of binnen een selectie.
1. Druk op Ctrl + G om het dialoogvenster Ga naar te openen en klik vervolgens op de knop Speciaal. Zie schermafbeelding:

2. Schakel de optie Formules in en klik daarna op OK om het dialoogvenster te sluiten. Zie schermafbeelding:

Nu zijn alle cellen met formules in het werkblad geselecteerd.

Tip:
1. Als u alleen formulecellen binnen een selectie wilt markeren, selecteert u eerst een bereik voordat u de functie Ga naar gebruikt.
2. U kunt in stap 2 de opties instellen om het formuletype te selecteren, bijvoorbeeld alleen foutformules.
Markeer alle formulecellen met VBA
Er is ook een VBA-code beschikbaar waarmee u alle cellen met formules in een bereik op het volledige werkblad kunt markeren.
1. Druk op Alt + F11 om het venster Microsoft Visual Basic for Applications te openen.
2. Klik op Module > Invoegen om een Module-venster in te voegen en kopieer de onderstaande VBA-code naar dit venster.
VBA: Markeer alle cellen met formules.
Sub SelectFormulaCells()
'Updateby20140827
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)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeFormulas, 23)
Application.ScreenUpdating = False
For Each Rng In WorkRng
Rng.Interior.ColorIndex = 36
Next
Application.ScreenUpdating = True
End Sub
3. Klik op de knop Uitvoeren. Vervolgens verschijnt een KutoolsforExcel-dialoogvenster waarin u een bereik kunt selecteren. Zie schermafbeelding:

4. Klik op OK. Vervolgens worden alle formulecellen gemarkeerd.

Tip: In de bovenstaande VBA-code kunt u het getal aanpassen in Rng.Interior.ColorIndex = 36 om de markeerkleur naar wens in te stellen.
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