Note: The other languages of the website are Google-translated. Back to English
Einloggen  \/ 
x
or
x
Registrieren  \/ 
x

or

Wie verweise ich in Excel auf das Arbeitsblatt anhand der Indexnummer anstelle des Namens?

Bei vielen Excel-Benutzern wird der Standard-Arbeitsblattname gewöhnlich in den erforderlichen umbenannt. In vielen Fällen müssen sie das Arbeitsblatt jedoch anhand seiner Indexnummer und nicht anhand seines tatsächlichen Namens referenzieren. Wie erreicht man das? Sie können die Methode im Artikel ausprobieren.

Referenzarbeitsblatt nach Indexnummer anstelle des Namens mit benutzerdefinierter Funktion


Referenzarbeitsblatt nach Indexnummer anstelle des Namens mit benutzerdefinierter Funktion


Gehen Sie wie folgt vor, um das Arbeitsblatt anhand der Indexnummer anstelle des Namens in Excel zu referenzieren.

1. Drücken Sie Andere + F11 Tasten gleichzeitig zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

2. In dem Microsoft Visual Basic für Applikationen Klicken Sie im Fenster Insert > Modul. Kopieren Sie dann den folgenden VBA-Code und fügen Sie ihn in das Modulfenster ein.

VBA-Code: Referenzarbeitsblatt nach Indexnummer in Excel

Function SHEETNAME(number As Long) As String
    SHEETNAME = Sheets(number).Name
End Function

3. Drücken Sie die Taste Andere + Q Tasten zum Schließen der Microsoft Visual Basic für Applikationen Fenster.

Notes:

1. Wenn Sie einen bestimmten Blattnamen mit seiner Nummer referenzieren müssen, wählen Sie eine leere Zelle aus und geben Sie die Formel ein = BLATTNAME (1) direkt in die Formelleiste und drücken Sie die Eingabetaste. Siehe Screenshot:

2. Wenn Sie einen Zellenwert aus einem Arbeitsblatt basierend auf seiner Indexnummer erhalten möchten, verwenden Sie bitte diese Formel.

=INDIRECT("'"&SHEETNAME(1) &"'!A1")

3. Wenn Sie eine bestimmte Spalte in einem Arbeitsblatt anhand ihrer Indexnummer summieren möchten, wenden Sie diese Formel an.

=SUM(INDIRECT("'"&SHEETNAME(1) &"'!C2:C7"))


In Verbindung stehende Artikel:


Die besten Tools für die Office-Produktivität

Kutools for Excel löst die meisten Ihrer Probleme und erhöht Ihre Produktivität um 80%

  • Wiederverwendung: Schnell einfügen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Super Formula Bar (leicht mehrere Textzeilen und Formeln bearbeiten); Layout lesen (leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen / Spalten... doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie Duplizieren oder Eindeutig Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufällige Auswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen zu mehreren Blättern; Aufzählungszeichen einfügen, Kontrollkästchen und mehr ...
  • Text extrahieren, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen;; Paging-Zwischensummen erstellen und drucken; Inhalt und Kommentare zwischen Zellen konvertieren...
  • Superfilter (Speichern und Anwenden von Filterschemata auf andere Blätter); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Kombinieren Sie Arbeitsmappen und Arbeitsblätter;; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten in mehrere Blätter aufteilen; Batch-Konvertierung von xls, xlsx und PDF...
  • Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2019 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. Vollständige Funktionen 30 Tage kostenlose Testversion. 60 Tage Geld-zurück-Garantie.
kte tab 201905

Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Erhöht Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
officetab unten
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Jork · 8 months ago
    If you use this UDF, I'd suggest Making two changes in bold below, with notes on why.

    Function SHEETNAME(number As Long) As String
    Application.Volatile <--------- this makes the function recalculate when you change the sheets name. Otherwise when you change the sheet name it doesn't change unless you perform a manual recalculation.----------
    SHEETNAME = Thisworkbook.Sheets(number).Name <------ If you use this function in multiple workbooks, it will only check names of the workbook the function is in. Otherwise this function will potentially call the tab names from other open Workbooks with this formula.-------
    End Function
    • To post as a guest, your comment is unpublished.
      john · 12 days ago
      Thank you very much for the script and the additions! Exactly what I was looking for without any prior knowledge about VBAs.
  • To post as a guest, your comment is unpublished.
    Kjeld · 4 years ago
    Nice solution.
    Also, referencing cell B4 of the first sheet in another Excel file can be done like this:
    =INDIRECT("'[other_filename.xlsx]"&SHEETNAME(1) &"'!B4")

    However note that the file containing the VBA script needs to be stored as a macro file, .xlsm

    Cheers,