Hoe maak je een vervolgkeuzelijst met hyperlinks naar elk blad in Excel?
Misschien heb je eerder een vervolgkeuzelijst gemaakt, maar heb je ooit een vervolgkeuzelijst gemaakt met de hyperlinks naar elk blad in Excel zoals onderstaand screenshot laat zien?
Maak een vervolgkeuzelijst met bladhyperlinks
Maak een lijst met bladen met hyperlinks
Maak een vervolgkeuzelijst met een bladhyperlink
Er is alleen een VBA-code die de taak in Excel aankan.
1. klikken Ontwikkelaar > Invoegen > Combo Box (ActiveX-besturingselementen).
Opmerking: als het ontwikkelaarstabblad niet in het lint wordt weergegeven, klikt u op Dien in > Opties > Lint aanpassenen controleer vervolgens de Ontwikkelaar optie in het rechtervak. Zie screenshot:
2. Teken vervolgens een keuzelijst met invoervak waar u maar wilt.
3. Klik met de rechtermuisknop op het vel waarop u zojuist de keuzelijst met invoervak heeft getekend en klik Bekijk code vanuit het contextmenu.
4. Kopieer en plak onderstaande code in het lege script en sla het op om terug te gaan naar het blad.
VBA: maak een vervolgkeuzelijst met bladkoppelingen
Private Sub ComboBox1_Change()
'UpdatebyExtendoffice20180404
Sheets(Me.ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_GotFocus()
Dim I As Long
Me.ComboBox1.Style = fmStyleDropDownList
If Me.ComboBox1.ListCount <> Sheets.Count Then
Me.ComboBox1.Clear
For I = 1 To ActiveWorkbook.Sheets.Count
Me.ComboBox1.AddItem Sheets(I).Name
Next
End If
Me.ComboBox1.DropDown
End Sub
5. klikken Ontwikkelaar > Ontwerpmodus om de ontwerpmodus te verlaten.
Nu zijn alle bladen in de vervolgkeuzelijst vermeld en wordt deze naar het blad geleid terwijl u op de bladnaam klikt.
Maak een lijst met bladen met hyperlinks
Als u alleen een lijst met klikbare bladnamen wilt maken, zoals hieronder afgebeeld, kunt u zich aanmelden Kutools for Excel's Create List of Sheet Names functie waarmee u een lijst met hyperlinks over bladnamen of een lijst met macroknoppen over bladnamen kunt maken.
Kutools for Excel, met meer dan 300 handige functies, maakt uw werk eenvoudiger. |
Na het installeren van Kutools voor Excel, doe het als volgt:(Download nu Kutools voor Excel!)
1. klikken Koetools Plus > Werkblad > Create List of Sheet Names.
2. In de Create List of Sheet Names dialoogvenster, doe zoals hieronder:
(1). Rekening Contains a list of hyperlinks< om een lijst met klikbare bladnamen te maken, of vink dit aan Contains buttons and macros om knoppen te maken die naar elk blad linken.
(2). Geef het nieuwe blad waarop u de hyperlinks gaat plaatsen een naam.
(3). Geef de locatie van het nieuwe blad op.
(4). Geef de bladlinks op die worden weergegeven als hoeveel kolommen.
3. klik op Ok, nu zijn de klikbare bladnamen weergegeven in een nieuw blad.
Demo
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!