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,
... meinse Wissens nur mit VBA.
Der Befehl könnte u.a. lauten
MsgBox Worksheets.Count
Gruß
Rainer
Zitat:
Kann man ermitteln welche "Nummer" zuletzt vergeben wurde?
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
Ä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
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
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,
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
Zitat:
...
Sheets.Add
Sheets("Tabelle1").Select
Sheets("Tabelle1").Name = "Hilfsblatt"
...
...
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
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 habe nunmehr Deinen Vorschlag umgesetzt.
DANKE!
Tom