Hoe kunt u snel alleen de actieve of geselecteerde werkbladen in Excel weergeven?
Als er meerdere werkbladen in uw werkboek zijn, en u nu alleen de actieve of geselecteerde werkbladen wilt weergeven en alle andere werkbladen wilt verbergen, hoe kunt u dit dan snel doen zonder ze één voor één handmatig te verbergen?
Alleen het actieve werkblad weergeven met VBA
Alleen de geselecteerde werkbladen weergeven met Kutools voor Excel
Alleen het actieve werkblad weergeven met VBA
Hier is een VBA-code die snel alle werkbladen behalve het actieve kan verbergen.
1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster weer te geven.
2. Klik vervolgens op Invoegen > Module en plak onderstaande VBA in het nieuwe modulevenster.
VBA: Alleen het actieve werkblad weergeven
Sub Macro1()
'UpdatebyKutoolsforExcel20160409
Dim xSht As Object
For Each xSht In ThisWorkbook.Sheets
If xSht.Name <> ThisWorkbook.ActiveSheet.Name
Then xSht.Visible = False
Next
End Sub
3. Klik op de knop Uitvoeren of druk op de F5-toets om de VBA uit te voeren. Nu wordt alleen het actieve werkblad weergegeven, de andere zijn verborgen.
Alleen de geselecteerde werkbladen weergeven met Kutools voor Excel
Als u Kutools voor Excel hebt geïnstalleerd, kunt u met één klik snel inactieve of niet-geselecteerde werkbladen verbergen.
Na het gratis installeren van Kutools voor Excel doet u het volgende:
Activeer een werkblad of selecteer de werkbladen die u wilt weergeven, en klik vervolgens op Kutools > Weergeven & Verbergen > Verberg inactieve bladen. Zie screenshot:
Nu zijn de niet-geselecteerde werkbladen verborgen.
Tip: Als u alle werkbladen wilt weergeven, kunt u klikken op Kutools > Weergeven & Verbergen > Alles weergeven. Zie screenshot:
Gerelateerde artikelen
- Hoe rijen te verbergen op basis van celwaarde in Excel?
- Hoe maakt u een dynamische lijst van werkbladnamen in Excel?
- Hoe werbladen te hernoemen op basis van celwaarden in Excel?
Beste Office-productiviteitstools
Versterk 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 krijgen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in
- 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!