ich habe eine Datei mit mehreren Tabellenblättern. Als erstes Tabellenblatt wollte ich eine Übersicht mit allen Namen der Tabellenblätter und wollte dann Werte aus diesen Blättern der Übersichtsliste zuordnen. Das habe ich auch geschafft, mit einer kleinen VBA-Lösung aus dem Internet, welche ich für mich ein bisschen abgeändert habe und zwar folgende:
Sub Seitennamen()
Dim lngWorksheets As Long 'Worksheets sind nur Tabellenblätter
Dim i As Long
lngWorksheets = ThisWorkbook.Worksheets.Count
For i = 1 To lngWorksheets
ThisWorkbook.Sheets("Übersicht").Cells(1 + i, 1).Value = ThisWorkbook.Worksheets(i).Name
Next i
End Sub
Jetzt mein Problem: die erste Tabelle ist die Übersicht und die zweite ist eine leere Mustertabelle. Wie muss ich die VBA-Lösung ändern, damit er erst ab der dritte Tabelle mir die Namen in der Übersicht auflistet?Den zweiten Teil mit den Werten auslesen habe ich mit folgender Formel bewerkstelligt:
=INDIREKT("'"&A2&"'!M34";WAHR)
Dieses klappt genauso wie ich es will.
Besteht die Möglichkeit, wenn ich auf der Übersicht auf den Namen des Tabellenblattes (welches per VBA ausgelesen wurde) klicke, das ich dann automatisch diese Tabellenblatt bearbeiten kann und nicht erst unten durch alle einzeln klicken muss.
Gruß,
Mike