Liste der Tabellenblätter - mit Hyperlink
10.05.2005 11:19:26
Tom
habe in der Recherche eigentlich genau das gefunden, was ich suche:
Auflistung aller Tabellenblätter in einer Spalte (von UweD)
Sub Blätter()
Dim B, I%
For Each B In ActiveWorkbook.Sheets
I = I + 1
Cells(I, 1).Value = Sheets(I).Name
Next
End Sub
Nun möchte ich aber noch erreichen, das die Auflistung den jeweiligen hyperlink zu dem Tabellenblatt einbindet - hat jemand ne Idee?
danke vorab
Tom