Hoe past u Bevriezen/Deblokkeren van vensters tegelijkertijd toe op meerdere werkbladen?
Wanneer u werkt met een groot Excel-werkboek met tientallen of zelfs honderden werkbladen, wilt u bepaalde rijen of kolommen vaak zichtbaar houden door vensters te bevriezen. De standaardfunctie Bevries vensters van Excel werkt echter alleen op het actieve werkblad, waardoor het tijdrovend is om deze handeling handmatig op elk blad te herhalen. Bestaat er dan een manier om dezelfde rijen of kolommen in één keer op alle werkbladen te bevriezen (of later weer te deblokkeren)? Zo bespaart u tijd én voorkomt u dat u per ongeluk een blad over het hoofd ziet!
Bevries vensters tegelijkertijd op alle werkbladen met VBA-code
Deblokkeer vensters tegelijkertijd op alle werkbladen met VBA-code
Bevries/Deblokkeer vensters tegelijkertijd op alle werkbladen met één klik met Kutools voor Excel
Bevries vensters tegelijkertijd op alle werkbladen met VBA-code
Als u vensters op dezelfde cellocatie op elk werkblad in uw werkmap wilt bevriezen, biedt VBA een efficiënte oplossing om dit proces te automatiseren. Zo behoudt u een consistente weergave over alle bladen — bijvoorbeeld door koptekstrijen of belangrijke kolommen altijd zichtbaar te houden, zelfs in grote werkmappen. Houd er rekening mee dat u op elk werkblad de cel moet selecteren waarop het bevriezen moet worden toegepast, aangezien VBA het vensterbevriezen baseert op de actieve cel binnen elk blad.
1. Als u alle werkbladen op dezelfde positie wilt bevriezen, selecteert u eerst de cel die u wilt bevriezen in het werkblad en houdt u vervolgens de Shift-toets ingedrukt om alle bladtabs te selecteren.
2. Druk op ALT + F11 om het venster Microsoft Visual Basic for Applications te openen.
3. Klik in het VBA-editorvenster op Invoegen > Module en kopieer en plak vervolgens de volgende VBA-code in het modulevenster:
VBA-code: Bevries alle werkbladen tegelijkertijd in Excel
Sub Freeze()
'Updateby Extendoffice
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
Ws.Activate
With Application.ActiveWindow
.FreezePanes = True
End With
Next
Application.ScreenUpdating = True
End Sub
4. Druk op F5 of klik op de knop Uitvoeren om de code uit te voeren. Hierdoor worden de vensters op alle werkbladen vastgezet op de positie van de actieve cel.
Opmerking: Als u niet alle werkbladen hebt geselecteerd en de actieve cel per blad verschilt, kan de locatie van het bevroren venster per blad variëren. Zorg er daarom altijd voor dat de actieve cel op dezelfde positie staat voordat u de code uitvoert.
Deblokkeer vensters tegelijkertijd op alle werkbladen met VBA-code
Wanneer u bevroren vensters hebt ingesteld op meerdere werkbladen en deze instelling tegelijkertijd van alle bladen wilt verwijderen, stroomlijnt een VBA-oplossing het proces aanzienlijk. In plaats van handmatig blad voor blad de vensters te deblokkeren, verwijdert de volgende macro in één keer alle bevroren vensters.
1. Open de werkmap waarin op meerdere werkbladen bevroren vensters zijn ingesteld.
2. Druk op ALT + F11 om de editor Microsoft Visual Basic for Applications te openen.
3. Klik op Invoegen > Module en plak vervolgens de onderstaande code in het modulevenster:
VBA-code: Deblokkeer alle werkbladen tegelijkertijd in Excel
Sub UnFreeze()
'Updateby Extendoffice
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
Ws.Activate
With Application.ActiveWindow
.FreezePanes = False
End With
Next
Application.ScreenUpdating = True
End Sub
4. Druk op F5 of klik op de knop Uitvoeren om de code uit te voeren. Alle werkbladen met bevroren vensters worden onmiddellijk gedeblokkeerd.
Bevries/Deblokkeer vensters tegelijkertijd op alle werkbladen met één klik met Kutools voor Excel
Als u liever geen VBA gebruikt of op zoek bent naar een eenvoudigere, codevrije methode, biedt Kutools voor Excel een effectieve oplossing om Bevries- of Deblokkeervensters op alle werkbladen toe te passen via een eenvoudig menu. Deze functie is ideaal voor gebruikers die snel en betrouwbaar resultaat willen, zonder gedoe met macro-instellingen. De hulpmiddelen Bevries vensters voor meerdere werkbladen en Ontdooi vensters voor meerdere werkbladen werken naadloos samen: met één handeling stelt u bevroren vensters in of verwijdert u ze op elk werkblad. Zo bespaart u flink wat tijd bij grote werkmappen en voorkomt u inconsistenties tussen bladen.
Na installatie van Kutools voor Excel, volgt u deze stappen:
1. Selecteer de cel waarop u het venster wilt bevriezen op alle werkbladen (bijvoorbeeld cel B2 als u rij 1 en kolom A zichtbaar wilt houden). Deze positie wordt uniform toegepast op elk werkblad. Zie screenshot:

2. Klik op het Excel-lint op KUTOOLS PLUS > Werkblad > Bevries vensters voor meerdere werkbladen. Zie screenshot:

3. Bevries vensters onmiddellijk op alle werkbladen op dezelfde aangewezen celpositie (bijv. B2), zodat uw weergave consistent blijft in de hele werkmap.
Opmerking: Om bevroren vensters in één handeling van alle werkbladen te verwijderen, selecteert u KUTOOLS PLUS > Werkblad > Ontdooi vensters voor meerdere werkbladen. Zo past u de weergave flexibel aan uw wensen aan bij het werken met grote of complexe datasets. Deze functie is vooral handig bij het opstellen van sjablonen, bestuursvergaderingen of wanneer u snelle en consistente navigatie nodig heeft.
Demo: Bevries/Deblokkeer vensters tegelijkertijd op alle werkbladen met één klik met Kutools voor Excel
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