Forums Neueste Beiträge
 

2010: "Inhaltsverzeichnis"

03/12/2013 - 10:05 von Heiko Rompel | Report spam
Moin,

ich habe da mal wiede eine besondere Frage:

Ich habe eine Exceldatei mit x-Arbeitsblàttern.
Um jetzt ein bestimmtes Arbeitsblatt zu finden, muss man alle
Arbeitsblàtter durchscrollen.

Gibt es einen Trick, der mir eine Übersicht der Arbeitsblàtter anzeigt?

Oder vielleicht ein Script das auf einem leeren Blatt Zeilenweise die
Arbeitsblattnamen auflistet, vielleicht sogar als Links zu den Blàttern?

Gruß Heiko
 

Lesen sie die antworten

#1 Claus Busch
03/12/2013 - 10:19 | Warnen spam
Hallo Heiko,

Am Tue, 03 Dec 2013 10:05:59 +0100 schrieb Heiko Rompel:

Oder vielleicht ein Script das auf einem leeren Blatt Zeilenweise die
Arbeitsblattnamen auflistet, vielleicht sogar als Links zu den Blàttern?



füge ein neues Blatt ein und stelle es an den Anfang (1.Blatt).
Folgender Code erstellt dir dann Hyperlinks zu den Blàttern:
Sub Inhalt()
Dim i As Integer

With ActiveSheet
.Cells(1, 1) = " Inhaltsverzeichnis"
For i = 2 To Sheets.Count
.Hyperlinks.Add _
anchor:=.Cells(i, 1), _
Address:="", _
SubAddress:="'" & Sheets(i).Name & "'!A1", _
TextToDisplay:="Zu " & Sheets(i).Name
Next
.Columns("A").AutoFit
End With
End Sub


Mit freundlichen Grüßen
Claus
Win XP Prof SP3 / Vista Ultimate SP2
Office 2003 SP3 /2007 Ultimate SP3

Ähnliche fragen