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 Sub
Note: 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 Koetools 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.
Note: 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
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar effici毛ntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
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 honderden muisklikken voor u elke dag!