Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

"Status" Tabellenname - Tabelle???





Frage

Guten Morgen! Werden im Excel neue Tabellenblätter eingefügt (Einfügen --> Tabellenblatt), so wird die nächste frei "Nummer" für die Tabellenblattbezeichnung vergeben. Beispiel: Tabelle1, Tabelle2, Tabelle3 vorhanden --> Einfügen --> Tabellenblatt = Tabelle4. Kann man ermitteln welche "Nummer" zuletzt vergeben wurde? Wird z. B. das Blatt Tabelle4 gelöscht und fügt man (bei geöffneter Datei) erneut ein Blatt ein, so wird dieses als Tabelle5 bezeichnet. Excel hat wohl intern einen "Zähler", oder? Thanx Tom

Antwort 1 von rainberg

Hallo Tom,

Zitat:
Kann man ermitteln welche "Nummer" zuletzt vergeben wurde?


... meinse Wissens nur mit VBA.
Der Befehl könnte u.a. lauten

MsgBox Worksheets.Count

Gruß
Rainer

Antwort 2 von Flupo

Der Zähler zählt aber nur solange die Datei geöffnet ist. Speichert man nach den Löschen von Tabelle4 ab und beendet Excel, dann wird das nächste Tabellenblatt wieder Tabelle4 genannt.
Ähnlich ist das ja auch mit dem Dateinamen, der beim Anlegen neuer Dateien vergeben wird (Mappe1, Mappe2...).

Gruß Flupo

Antwort 3 von Flupo

Worksheets.Count zählt nur die aktuell in der Datei vorhandenen Tabellenblätter. Den internen Zähler kann man damit nicht auslesen.

Gruß Flupo

Antwort 4 von Tomschi

Hi!

Herzlichen Dank für die Unterstützung!

Schade, dass man offensichtlich die "Nummer" nicht ermitteln kann.

Folgende Problem liegt meiner Fragestellung zugrunde:
Per VBA wird ein Tabellenblatt eingefügt und danach umbenannt.
...
Sheets.Add
Sheets("Tabelle1").Select
Sheets("Tabelle1").Name = "Hilfsblatt"
...

Gibt es nunmehr das Blatt "Tabelle1" nicht
--> Tabelle1 wurde irrtümlich gelöscht und nunmehr heisst das Tabellenblatt "Tabelle2",
so kommt es zu einem Fehler. Vielleicht hat ja jemand einen Vorschlag wie dies umgehen könnte.

Vor dem Verlasssen des Makros wird das Blatt "Hilfsblatt" (vormals "Tabelle1") wieder gelöscht.
Anmerkung: Der Code stammt nicht von mir.

Ciao

Tom

Antwort 5 von DukeNT

Hi Tom,

Zitat:
...
Sheets.Add
Sheets("Tabelle1").Select
Sheets("Tabelle1").Name = "Hilfsblatt"
...


wenn ich dich richtig verstanden habe, möchtest du ein neues Tabellenblatt einfügen und dieses gleich in "Hilfsblatt" umbenennen?
Dann Versuche mal folgendes:
...
Sheets.Add before:=Sheets(1)
Sheets(1).Name = "Hilsblatt"
...

Damit wird eine neue Tabelle vor der ersten Tabelle eingefügt und umbenannt.
Um die Tabellen anzusprechen braucht man nicht unbedingt den Namen der Tabelle, es geht auch mit Sheets(1) entspricht 1.Tabelle
Sheets(2) entspricht 2.Tabelle usw....

Gruß Niels

Antwort 6 von Tomschi

Hi Niels!

Richtig verstanden. --> Tabellenblatt als quasi "Hilfsblatt" einfügen
Ich werde meinen Arbeitskollenge Fragen ob ich den Code laut Deinem Vorlag ändern darf und mich dann nochmals melden.

Bye

Tom

Antwort 7 von Tomschi

Guten Morgen Niels!

Ich habe nunmehr Deinen Vorschlag umgesetzt.

DANKE!

Tom

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: