Maak een inhoudsopgave voor Excel-spreadsheets
U wilt een inhoudsopgave maken op het eerste blad in een grotere Excel-werkmap. Hiervoor heeft u een lijst nodig met de namen van de afzonderlijke tabellen. Een macro helpt u hierbij.
Maak een inhoudsopgave met behulp van een Excel-macro
Omdat u niet rechtstreeks toegang hebt tot de bladnamen via de tabelfunctie, kunt u dit het beste doen met een macro.
- Voer hiervoor de opdracht "Tools | Macro | Macro's" uit in de geopende werkmap. Typ een naam zoals "Lijstlijst" voor de nieuwe macro en klik op "Maken".
- Voer de volgende programmacode in de VBA-editor in:
- Subtabellijst ()
- Vellen (1) rechtenmenu.Selecteer
- Sheets.Add
- Spreadsheets (1) .Name = "Content"
- n = 1
- Voor elke i in werkbladen
- Als i.Index 1 Dan bereik ("a" & n - 1). Waarde = i.Name
- n = n + 1
- Volgende ik
- Einde Sub
Sluit de VBA-editor met de opdracht "Bestand | Sluiten en terug naar Microsoft Excel". Roep "Tools | Macro | Macro's" aan om de macro uit te voeren. Selecteer in het volgende dialoogvenster uw macro "Lijstlijst" en klik op "Uitvoeren".
Maak een nieuw werkblad met inhoudsopgave
Excel maakt vervolgens een extra werkblad aan het begin van de werkmap en maakt een overzicht van alle tabellen in de map.
- In plaats van op een nieuw blad, kunt u de lijst in een bestaande tabel laten maken. Wijzig hiertoe de tweede regel van de macro: Voer bijvoorbeeld >> Spreadsheets ("Overzichtsblad") in. Selecteer <<. U kunt de naam van het gewenste blad gebruiken als argument tussen haakjes.
- U kunt ook een volgnummer kiezen dat overeenkomt met de rangorde van het blad in de werkmap. Verwijder ten slotte de volgende twee regels in de macro waarmee het extra blad wordt ingevoegd.