Hoe selecteer je een specifiek werkblad op basis van de celwaarde op een ander blad in Excel?
Stel dat u een vervolgkeuzelijst voor gegevensvalidatie heeft die alle werkbladnamen bevat, en u wilt automatisch het overeenkomstige werkblad selecteren of ernaar springen op basis van de bladnaam die u in de vervolgkeuzelijst hebt geselecteerd, wat kunt u dan doen? En wat dacht u van automatisch naar een bepaald werkblad springen nadat u de bladnaam in een opgegeven cel hebt getypt? Dit artikel laat je verschillende methoden zien om dit te bereiken.
Selecteer een specifiek werkblad op basis van de selectie van de vervolgkeuzelijst met VBA-code
Selecteer een specifiek werkblad op basis van de celwaarde met VBA-code
Maak eenvoudig een bladindex en ga naar een bepaald werkblad met Kutools voor Excel
Selecteer een specifiek werkblad op basis van de selectie van de vervolgkeuzelijst met VBA-code
Een vervolgkeuzelijst vindt bijvoorbeeld plaats in cel A2 van blad8. U kunt de onderstaande VBA-code uitvoeren om het bijbehorende werkblad te selecteren of naar het bijbehorende werkblad te springen wanneer de bladnaam is geselecteerd in de vervolgkeuzelijst.
1. druk op anders + F11 om de te openen Microsoft Visual Basic voor toepassingen venster.
2. In de Microsoft Visual Basic voor toepassingen dubbelklik op de bladnaam (het werkblad met de vervolgkeuzelijst waaruit u bladnamen selecteert) in de linkerbalk en kopieer en plak de onderstaande VBA-code in het codevenster.
VBA-code: selecteer een specifiek werkblad op basis van de selectie van de vervolgkeuzelijst
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not (Application.Intersect(Range("A2"), Target) Is Nothing) Then _
ThisWorkbook.Sheets(Target.Value).Activate
End SubOpmerking:: U kunt "A2" wijzigen in uw eigen cel.
3. druk op anders + Q toetsen tegelijk om het Microsoft Visual Basic voor toepassingen venster.
Wanneer u vanaf nu een bladnaam kiest in de vervolgkeuzelijst van Blad8, wordt dat werkblad automatisch geselecteerd.
Selecteer een specifiek werkblad op basis van de celwaarde met VBA-code
Als u naar een bepaald werkblad wilt springen nadat u de bladnaam in een cel hebt getypt (cel A1 in blad1), kunt u de volgende VBA-code proberen.
1. druk op anders + F11 om de te openen Microsoft Visual Basic voor toepassingen venster.
2. In de Microsoft Visual Basic voor toepassingen dubbelklik op de bladnaam (het werkblad dat u in de bladnaam typt) in de linkerbalk en kopieer en plak de onderstaande VBA-code in het codevenster. Zie screenshot:
VBA-code: selecteer een specifiek werkblad op basis van de celwaarde
Sub ActivateSheetsByValue()
On Error Resume Next
ThisWorkbook.Sheets(Worksheets("Sheet1").Range("A1").Value).Activate
End Sub
3. Ga terug naar het werkblad en voer de bladnaam in die u wilt selecteren in cel A1, en activeer het codevenster en druk op F5 om de code uit te voeren.
Als cel A1 in Blad1 de werkbladnaam "Blad8" bevat, springt het na het uitvoeren van de VBA-code onmiddellijk naar Blad8.
Maak eenvoudig een bladindex en ga naar een bepaald werkblad met Kutools voor Excel
Als u snel een specifiek werkblad wilt selecteren of ernaar wilt springen, kunt u het Maak een lijst met bladnamen nut van Kutools for Excel. Met dit hulpprogramma kunt u eenvoudig een bladindex maken en vervolgens snel naar een bepaald werkblad springen door op de bladnaam te klikken.
Voor het aanvragen Kutools for Excel, Dan kunt u download en installeer het eerst.
1. klikken Kutools Plus > Werkblad > Maak een lijst met bladnamen. Zie screenshot:
2. In de Maak een lijst met bladnamen dialoogvenster, selecteer Bevat een lijst met hyperlinks optie in het Bladindexstijlen sectie; typ een naam voor uw bladindex in het Geef de bladnaam op voor de bladindex doos; Kiezen Vóór alle vellen in de bladindex invoegen in de vervolgkeuzelijst. Klik vervolgens op het OK knop.
Opmerking:: controleer de Bevat knoppen en macro's optie, u krijgt een bladindex met macro's-knop. Zie screenshot:
In het Index-werkblad kunt u op een bepaalde werkbladnaam klikken om automatisch naar dat werkblad te gaan.
Als u een gratis proefperiode (30 dagen) van dit hulpprogramma wilt, klik om het te downloaden, en ga vervolgens de bewerking toepassen volgens de bovenstaande stappen.
Maak eenvoudig een bladindex en ga naar een bepaald werkblad met Kutools voor Excel
De beste tools voor kantoorproductiviteit
Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%
- visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
- Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
- Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
- Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
- Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
- Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
- Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
- Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
- Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2019 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Gratis proefperiode van 30 dagen met volledige functies. 60 dagen geld-terug-garantie.
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert elke dag honderden muisklikken!
