Hoe navigeer je tussen werkbladen met behulp van de vervolgkeuzelijst in Excel?
Stel dat u een werkmap heeft die meerdere werkbladen bevat, nu moet u een vervolgkeuzelijst of keuzelijst met invoervak maken waarin alle bladnamen worden vermeld en wanneer u een bladnaam uit de vervolgkeuzelijst selecteert, springt deze onmiddellijk naar dat blad. In dit artikel zal ik introduceren hoe u tussen werkbladen kunt navigeren met behulp van een vervolgkeuzelijst in Excel.
Navigeer tussen werkbladen met behulp van de vervolgkeuzelijst in Excel
Navigeer tussen werkbladen met behulp van de vervolgkeuzelijst in Excel
Voer de volgende stappen uit om naar elk geselecteerd blad te gaan met behulp van een vervolgkeuzelijst:
1. Klikken Ontwikkelaar > Invoegen > Combo Box (ActiveX-besturingselement), zie screenshot:
2. Sleep vervolgens met de muis om een keuzelijst met invoervak te tekenen, klik er met de rechtermuisknop op en selecteer Bekijk code zie screenshot vanuit het contextmenu:
3. In het geopende Microsoft Visual Basic voor toepassingen venster, kopieer en plak de volgende code om de originele code te vervangen, zie screenshot:
VBA-code: navigeer tussen werkbladen met behulp van de vervolgkeuzelijst
Private Sub ComboBox1_Change()
'Updateby Extendoffice
If ComboBox1.ListIndex > -1 Then Sheets(ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_DropButtonClick()
Dim xSheet As Worksheet
On Error Resume Next
Application.ScreenUpdating = False
Application.EnableEvents = False
If ComboBox1.ListCount <> ThisWorkbook.Sheets.Count Then
ComboBox1.Clear
For Each xSheet In ThisWorkbook.Sheets
ComboBox1.AddItem xSheet.Name
Next xSheet
End If
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub
Private Sub ComboBox1_GotFocus()
If ComboBox1.ListCount <> 0 Then ComboBox1.DropDown
End Sub
4. Sla vervolgens dit codevenster op en sluit het, en klik vervolgens op Ontwerpmodus om de ontwerpmodus uit te schakelen, gaat het nu bij het selecteren van een bladnaam uit de keuzelijst met invoervak naar dat blad, zie screenshot:
Navigeer tussen werkbladen met behulp van hyperlinks of knoppen:
met Kutools for Excel's Maak een lijst met bladnamen hulpprogramma, kunt u snel alle werkbladnamen weergeven in een nieuw blad met hyperlinks of macroknoppen, waarna u naar behoefte kunt navigeren tussen de namen.
Kutools for Excel: met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. Download en probeer nu gratis! |
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!