Verweisen auf einen Arbeitsblattnamen (Microsoft Excel)
Jon fragt sich, ob es eine Funktion gibt, die = ROW () oder = COLUMN () für Arbeitsblätter entspricht. Er muss (zum Beispiel) auf das vierte Blatt in einer Arbeitsmappe verweisen, kann sich aber nicht sicher sein, wie das Arbeitsblatt heißt.
Es gibt verschiedene Möglichkeiten, um dieses Problem anzugehen, je nachdem, was Sie tun müssen. Wenn Sie mit einem Arbeitsblatt arbeiten, das bereits gespeichert wurde, erhalten Sie mit der folgenden Formel den Arbeitsblattnamen für Sheet4:
=MID(CELL("filename",Sheet4!A1),FIND("]",CELL( "filename",Sheet4!A1))+1,LEN(CELL("filename", Sheet4!A1)))
Sie sollten beachten, dass diese Formel einige Annahmen enthält.
Zunächst (und vor allem) wird davon ausgegangen, dass Sie den ursprünglichen Namen des Arbeitsblatts kennen. In diesem Fall lautet der ursprüngliche Name Sheet4. Nachdem die Formel eingerichtet wurde, werden nachfolgende Änderungen am Arbeitsblattnamen automatisch in der Formel übernommen. Die zweite Annahme ist, dass die Arbeitsmappe, in der Sie arbeiten, gespeichert wurde. Ist dies nicht der Fall, gibt die Formel einen Fehler zurück, bis die Arbeitsmappe gespeichert und neu berechnet wird.
Ein anderer Ansatz ist die Verwendung einer benutzerdefinierten Funktion. Im VBA-Objektmodell sind alle Arbeitsblätter in einer Arbeitsmappe in der Sheets-Auflistung enthalten. Diese sind wiederum indiziert. Auf diese Weise können Sie einen Indexwert an die Funktion übergeben und den Namen des Arbeitsblatts unter der Indexnummer der Sammlung zurückerhalten.
Function TabName(lSNum As Long) As String If lSNum > 0 And lSNum <= Sheets.Count Then TabName = Sheets(lSNum).Name End If End Function
Wenn Sie beispielsweise den Namen des vierten Arbeitsblatts in der Sammlung wissen möchten, können Sie Folgendes in Ihrem Arbeitsblatt verwenden:
=TabName(4)
Die Funktion funktioniert auch in einer Arbeitsmappe, die nicht gespeichert wurde, einwandfrei. Es gibt auch den richtigen Arbeitsblattnamen zurück, selbst wenn die Arbeitsblätter umbenannt oder verschoben werden.
_Hinweis: _
Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.
ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.
Dieser Tipp (11553) gilt für Microsoft Excel 2007, 2010 und 2013. Eine Version dieses Tippes für die ältere Menüoberfläche von Excel finden Sie hier: