Hoe schakelt u snel heen en weer tussen twee werkbladen in Excel?
Stel dat u een werkmap hebt met veel werkbladen, maar dat u vaak alleen hoeft te schakelen tussen twee specifieke, niet-aangrenzende werkbladen, zoals Werkblad1 en Werkblad30. Hoe schakelt u dan snel en eenvoudig heen en weer tussen deze twee werkbladen in Excel?
Schakelen tussen twee niet-aangrenzende werkbladen met VBA-code
Schakelen tussen twee niet-aangrenzende werkbladen met Kutools voor Excel
Schakelen tussen twee niet-aangrenzende werkbladen met VBA-code
De volgende VBA-code stelt u in staat om eenvoudig heen en weer te schakelen tussen twee specifieke werkbladen. Volg deze stappen:
1. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.
2. Dubbelklik vervolgens op ThisWorkbook in de Projectverkenner om de module te openen (zie schermafbeelding):
Opmerking: Als de Projectverkennerniet zichtbaar is wanneer u het venster Microsoft Visual Basic for Applicationsopent, klikt u op het tabblad Beelden selecteert u Projectverkennerom deze te openen (zie schermafbeelding):
3. Plak vervolgens de volgende code in het Modulevenster.
VBA: schakelen tussen twee niet-aangrenzende werkbladen
Public LateWsName As String
'Update 20130830
Sub ToggleSheets()
If LateWsName <> "" Then
Application.Sheets(LateWsName).Activate
End If
End Sub
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
LateWsName = Sh.Name
End Sub
4. Klik daarna achtereenvolgens op de twee werkbladen (Werkblad1 en Werkblad30) waartussen u wilt schakelen.
5. Druk daarna op de toets F5 om deze code uit te voeren. De eerste keer wordt Werkblad 1 weergegeven; bij het opnieuw indrukken verschijnt Werkblad 30. Zo schakelt u eenvoudig heen en weer tussen deze twee werkbladen door op de toets F5 te drukken.
Schakelen tussen twee niet-aangrenzende werkbladen met Kutools voor Excel
De bovenstaande code is misschien wat lastig voor u. Daarom geef ik u hieronder een eenvoudige manier om deze taak met één klik uit te voeren.
Kutools voor Excel bevat meer dan 300 handige Excel-hulpmiddelen. Probeer het gratis en zonder beperkingen gedurende 30 dagen. Download nu.
Nadat u Kutools voor Excel hebt geïnstalleerd, volgt u deze stappen:
1. Open de werkmap die u wilt gebruiken en klik vervolgens op Kutools > Navigatie.
2. Het navigatiepaneel wordt weergegeven. Klik vervolgens op het tabblad Werkbladen.
3. Klik vervolgens op de twee werkbladen waartussen u wilt schakelen. Wanneer u daarna op de knop 
in het paneel Navigatie klikt, schakelt u heen en weer tussen de twee laatst geselecteerde werkbladen.
Opmerking: U kunt ook schakelen tussen twee werkbladen in verschillende werkmappen.
Klik hier voor meer informatie over deze functie van Navigatie.
Gerelateerde artikelen:
- Alle werkbladen in één werkmap weergeven
- Navigeren tussen vensters in werkmappen
- Weergeven Navigatie
- Navigeren tussen cellen
- Benoemde bereiken weergeven
- Kolomkopnamen weergeven
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