Inhoudsopgave maken van tabbladen

[DennisR]

Goedemorgen,

In Word is het mogelijk om een index/inhoudsopgave te maken met daarin hyperlinks naar de desbetreffende hoofdstukken.
Voor een bestand met zo'n kleine 80 tabbladen wil ik graag een menu maken à la Word met hyperlinks naar elk tabblad, maar kan nergens vinden of dit wel of niet mogelijk is.

Zal ik dit handmatig per tabblad moeten doen, of bestaat hier binnen Excel tòch een functie voor?

Alvast bedankt!

Dennis

 

[VTeun]

Hoi,

Nee, de functionaliteit om van de (namen van) werkbladen een inhoudsopgave te genereren is er niet.
Er is wel een 'truc' voor, mits ..... de werkbladnamen een logische opbouw hebben wat de naamgeving betreft.

 

[Wigi]

Hier ga je veel inspiratie en code vinden:

http://www.mrexcel.com/tip017.shtml

 

[DennisR]

Hier ga je veel inspiratie en code vinden:

http://www.mrexcel.com/tip017.shtml

Enorm bedankt, hier kan ik inderdaad een hoop mee. Ik kwam op het MrExcelforum zelfs een nog uitgebreidere versie tegen welke tevens hyperlinks erin zet.

http://vbaexpress.com/kb/getarticle.php?kb_id=120

 

[snb]

Zoals deze

Sub inhoudsopgave()
  On Error Resume Next
  ActiveWorkbook.Sheets("Inhoud").Activate
  If Err.Number > 0 Then
    With ActiveWorkbook.Sheets.Add
      .Name = "Inhoud"
    End With
  End If
  With ActiveWorkbook.Sheets("Inhoud")
    .Columns(1).Clear
    For Each sh In ActiveWorkbook.Sheets
      If sh.Name <> "Inhoud" Then .Hyperlinks.Add .Cells(Rows.Count, 1).End(xlUp).Offset(1), "#" & sh.Name & "!$A$1", , , sh.Name
    Next
    .Columns(1).Sort Cells(1, 1)
  End With
End Sub