Hoe maak ik een lijst met alle werkbladnamen vanuit een werkmap?
Stel dat u een werkmap heeft met meerdere werkbladen en nu wilt u alle bladnamen in de huidige werkmap vermelden, is er dan een snelle methode om een lijst met deze bladnamen in Excel te maken zonder ze een voor een te typen? Deze tutorial geeft instructies voor het weergeven van werkbladnamen in Excel.
Haal dynamisch een lijst met alle werkbladnamen uit een werkmap met formules
Haal een lijst met alle werkbladnamen op uit een werkmap met een handige functie
Krijg een lijst met alle werkbladnamen uit een werkmap met VBA-code
Haal dynamisch een lijst met alle werkbladnamen uit een werkmap met formules
In Excel kunt u een bereiknaam definiëren en vervolgens een formule toepassen om alle bladnamen uit de huidige werkmap weer te geven, doe dit met de volgende stappen:
1. Ga om te klikken Formule > Name Manager, zie screenshot:
2. In de Name Manager dialoogvenster, klik New knop, zie screenshot:
3. In de pop-out Nieuwe naam dialoogvenster, specificeert u een naam in het Naam tekstvak en kopieer vervolgens de onderstaande formule naar het Verwijst naar tekstvak, zie screenshot:
=GET.WORKBOOK(1)&T(NOW())
4. Dan klikken OK > Sluiten om de dialoogvensters te sluiten, gaat u nu naar een blad waar u alle bladnamen wilt weergeven en voert u de volgende formule in een lege cel in:
=IFERROR(INDEX(MID(Sheetnames,FIND("]",Sheetnames)+1,255),ROWS($A$2:A2)),"")
Note: In de bovenstaande formule, Bladnamen is de bereiknaam die u in stap 3 hebt gekregen.
5. En sleep vervolgens de vulgreep naar de cellen wanneer lege cellen worden weergegeven, en nu zijn alle bladnamen van de huidige werkmap weergegeven zoals onderstaand screenshot:
6. Gebruik de onderstaande formule als u de hyperlink voor elk blad wilt maken:
=HYPERLINK("#'"&A2&"'!A1","Go To Sheet")
Note: In de bovenstaande formule, A2 is de cel die de bladnaam bevat, en A1 is de cel waarin u de actieve cel wilt plaatsen. Als u bijvoorbeeld op de hyperlinktekst klikt, wordt cel A1 van het blad gevonden.
7. Als u nu op de hyperlinktekst klikt, gaat u naar dat blad, zie onderstaande demo:
- 1. Met de bovenstaande formules worden de gemaakte bladnamen dynamisch weergegeven. Wanneer u de bladnaam in de werkmap wijzigt, wordt de indexbladnaam automatisch bijgewerkt.
- 2. U moet het bestand opslaan als Excel-werkmap met ingeschakelde macro's formaat, als u wilt dat de formules goed werken nadat het bestand is gesloten en opnieuw geopend.
Haal een lijst met alle werkbladnamen op uit een werkmap met een handige functie
Met de Maak een lijst met bladnamen hulpprogramma van de invoegtoepassing van derden Kutools for Excelkunt u met één klik een lijst met werkbladnamen maken en naar elk werkblad linken met een hyperlink.
Na het installeren van Kutools for Excel, doe dit als volgt:
1. Klik Koetools Plus > Werkblad > Maak een lijst met bladnamen, zie screenshot:
2. In de Maak een lijst met bladnamen dialoogvenster, specificeer dan de volgende instellingen:
(1.) Kies bladindexstijlen u wilt, kunt u de werkbladnamen maken met hyperlinks of met macroknoppen. (2.) Voer de werkbladnamen in voor de bladindex. (3.) Specificeer de locatie van de werkbladindex. (4.) Specificeer hoeveel kolommen u in het nieuwe werkblad wilt gebruiken om de werkbladnamen weer te geven. |
3. Nadat u de instellingen hebt voltooid, klikt u op OK. Alle werkbladnamen zijn weergegeven met koppelingen in een nieuw werkblad van de huidige werkmap. Zie screenshot:
werkbladnamen met hyperlinks | werkbladnamen met macrotoetsen |
Krijg een lijst met alle werkbladnamen uit een werkmap met VBA-code
1. Houd de ALT + F11 toetsen, en het opent de Microsoft Visual Basic voor toepassingen venster.
2. Klikken Invoegen > Moduleen plak de volgende macro in het Module Venster.
VBA: maak een lijst van alle werkbladnamen met hyperlinks in een nieuw werkblad:
Sub CreateIndex()
'updateby Extendoffice
Dim xAlerts As Boolean
Dim I As Long
Dim xShtIndex As Worksheet
Dim xSht As Variant
xAlerts = Application.DisplayAlerts
Application.DisplayAlerts = False
On Error Resume Next
Sheets("Index").Delete
On Error GoTo 0
Set xShtIndex = Sheets.Add(Sheets(1))
xShtIndex.Name = "Index"
I = 1
Cells(1, 1).Value = "INDEX"
For Each xSht In ThisWorkbook.Sheets
If xSht.Name <> "Index" Then
I = I + 1
xShtIndex.Hyperlinks.Add Cells(I, 1), "", "'" & xSht.Name & "'!A1", , xSht.Name
End If
Next
Application.DisplayAlerts = xAlerts
End Sub
3. druk de F5 toets om deze macro uit te voeren. Nu zijn alle werkbladnamen in de actieve werkmap opgenomen in een nieuw werkblad met de naam Index, en de bladnamen zijn ook aan elk blad gekoppeld, zie screenshot:
Gerelateerde artikelen
Maak een lijst van alle bestandsnamen in een map en maak er hyperlinks voor
Voor uw dagelijkse werk moet u wellicht meerdere bestandsnamen uit een map naar een werkblad importeren en hyperlinks voor elk bestand maken, zodat u het bestand snel en gemakkelijk kunt openen. Misschien kunt u de bestandsnamen kopiëren en plakken en er handmatig een voor een een hyperlink voor maken, maar dit zal veel tijd verspillen als er honderden bestanden in de map staan.
Kopieer of verplaats bestanden van de ene map naar de andere op basis van een lijst
Als u een lijst met bestandsnamen in een kolom in een werkblad heeft en de bestanden zich in een map op uw computer bevinden. Maar nu moet u deze bestanden verplaatsen of kopiëren waarvan de namen in het werkblad worden vermeld van hun oorspronkelijke map naar een andere zoals in het volgende screenshot. Hoe kon je deze taak zo snel mogelijk voltooien in Excel?
Krijg een lijst met bladnamen in Google Spreadsheets
In dit artikel zal ik enkele methoden introduceren om de naam van de huidige bladnaam of een lijst met bladnamen in Google-bladen te krijgen.
Navigeer tussen werkbladen door de vervolgkeuzelijst te gebruiken
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.
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!
Inhoudsopgave
- Haal dynamisch een lijst met alle werkbladnamen uit een werkmap met formules
- Haal een lijst met alle werkbladnamen op uit een werkmap met een handige functie
- Krijg een lijst met alle werkbladnamen uit een werkmap met VBA-code
- Gerelateerde artikelen
- De beste tools voor kantoorproductiviteit
- Heb je vragen? Stel ze hier.