Hoe kan ik heen en weer schakelen tussen twee werkbladen in Excel?
Stel dat je een werkboek hebt dat veel werkbladen bevat, maar vaak hoef je alleen maar te wisselen tussen twee specifieke, niet-aangrenzende werkbladen, zoals Werkblad1 en Werkblad30. Hoe kun je snel en gemakkelijk heen en weer schakelen tussen deze twee niet-aangrenzende 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 kan je helpen om heen en weer te springen tussen twee specifieke werkbladen. Doe het volgende:
1. Houd de toetsen ALT + F11 ingedrukt, en het venster Microsoft Visual Basic for Applications wordt geopend.
2. Dubbelklik vervolgens op ThisWorkbook in de Project Explorer om de module te openen, zie screenshot:
Opmerking: Als de Project Explorer niet wordt weergegeven wanneer je het venster Microsoft Visual Basic for Applications opent, kun je op het tabblad Weergave klikken en Project Explorer selecteren om het te openen, zie screenshot:
3. Plak vervolgens de volgende code in het Module-venster.
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 op de twee werkbladen (Werkblad1 en Werkblad30) waar je tussen wilt schakelen, één voor één.
5. Druk vervolgens op de toets F5 om deze code uit te voeren. Als je eenmaal drukt, wordt Werkblad1 weergegeven, en als je nogmaals drukt, wordt Werkblad30 ingeschakeld. Zo kun je door middel van het indrukken van de F5-toets heen en weer schakelen tussen deze twee werkbladen.
Schakelen tussen twee niet-aangrenzende werkbladen met Kutools voor Excel
Misschien is de bovenstaande code wat lastig voor je. Hier kan ik je een eenvoudige manier laten zien om deze taak met één klik uit te voeren.
Kutools voor Excel omvat meer dan 300 handige Excel-tools. Gratis te proberen zonder beperking gedurende 30 dagen. Download het nu.
Nadat je Kutools voor Excel hebt geïnstalleerd, doe dan het volgende:
1. Open het werkboek dat je wilt gebruiken. Klik vervolgens op Kutools > Navigatie.
2. Het Navigatievenster wordt weergegeven, klik vervolgens op het tabblad Werkbladen.
3Klik vervolgens op de twee werkbladen waar je tussen wilt schakelen, en daarna, wanneer je klikt 
op de knop in de Navigatievenster, worden de twee laatst geklikte werkbladen heen en weer geschakeld.
Opmerking: Je kunt ook twee werkbladen in twee werkboeken schakelen.
Klik hier om meer te weten te komen over dit Navigatievenster.
Gerelateerde artikelen:
- Alle werkbladen in één werkboek weergeven
- Navigeren tussen vensters in werkboeken
- Navigatievenster weergeven
- Navigeren tussen cellen
- Lijst met benoemde bereiken
- Lijst met kolomkopnamen
Beste productiviteitstools voor Office
Verbeter 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 kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- 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!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen