Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Tabellennamen per Makro ändern

Forumthread: Tabellennamen per Makro ändern

Tabellennamen per Makro ändern
Elmar
Hallo zusammen,
kann mir jemand zeigen, welchen Code ich in ein Makro einbauen muss, wenn der aktuelle Tabellenname ausgelesen werden und dann in einen neuen Tabellenamen "Ausbreitung" umbenannt werden soll. Mein Problem ist, dass die zu bearbeitende Datei immer in der ersten Tabelle unterschiedliche Tabellennamen hat. Ich muss diese also vor Start meines Makros immer manuell umbenennen.
Gibt es da eine Möglichkeit, das auch zu automatisieren, also immer vom ursprünglichen (unterschiedlichen) Tabellennamen in den Namen "Ausbreitung" umzubenennen.
Die komplette Datei enthält immer 2 Tabellenblätter wobei das zweite Blatt immer den Namen "Datentabelle" trägt, der nicht geänderet werden darf.
Hoffe, ich habe das nicht zu kompliziert erklärt, vielleicht ist es ja ganz einfach!
Grüße und danke vorab
Elmar
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Tabellennamen per Makro ändern
02.12.2009 21:16:08
werni
Hallo Elmar
Schreibe anstatt den Registername den Tabellename
Tabelle1 anstatt Sheets("Tabelle1")
Gruss Wener
AW: Tabellennamen per Makro ändern
02.12.2009 21:48:52
Elmar
Hallo Werner,
sorry, das habe ich noch nicht kapiert. Kannst Du mir ein kleines Beispiel zeigen?
Leider ist mein VBA wirklich bescheiden!!
Gruß
Elmar
Anzeige
AW: Tabellennamen per Makro ändern
02.12.2009 21:59:10
werni
Hallo Elmar
Userbild
Da kannst du die Tabelle1 umbennen soviel du willst.
Ich habe hier beide mal das selbe Blatt selectiert.
Gruss Werner
AW: Tabellennamen per Makro ändern
02.12.2009 22:08:00
Elmar
Alles klar!!!
DANKE
Elmar
Mische mich mal ein...
03.12.2009 07:50:39
Jens
Hallo Werner, Hallo Elmar
Zur Info:
Wenn die Datei auf einer anderssprachigen Version gestartet wird, dann gibt es da ebenfalls Probleme mit.
Siehe diesen Thread:
http://www.online-excel.de/fom/fo_read.php?f=1&bzh=-1&h=41040&ao=1
Gruß aus dem Sauerland
Jens
Anzeige
AW: Mische mich mal ein...
03.12.2009 08:14:17
werni
Hallo Jens
Da sind die alten Babyloner schuld, dass man sich heute nicht mehr versteht.
Da müsste man die aktive Tabelle mal nach dem Namen fragen und ev. umbenennen. In etwa so ...
Sub TESTEN()
If ActiveSheet.Name  "Datentabelle" Then
ActiveSheet.Name = "Ausbreitung"
End If
End Sub
Gruss Werner
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Tabellennamen in Excel automatisch ändern


Schritt-für-Schritt-Anleitung

Um den Tabellennamen in Excel per Makro zu ändern, kannst Du folgenden VBA-Code verwenden. Dieser Code liest den aktuellen Tabellennamen aus und ändert ihn in "Ausbreitung", solange der aktuelle Name nicht "Datentabelle" ist.

  1. Öffne Excel und drücke Alt + F11, um den VBA-Editor zu öffnen.

  2. Klicke auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.

  3. Füge den folgenden Code in das Modul ein:

    Sub TabellennamenAendern()
       If ActiveSheet.Name <> "Datentabelle" Then
           ActiveSheet.Name = "Ausbreitung"
       End If
    End Sub
  4. Schließe den VBA-Editor und kehre zu Excel zurück.

  5. Drücke Alt + F8, wähle TabellennamenAendern und klicke auf Ausführen, um das Makro zu starten.

Jetzt wird der aktuelle Tabellenname in "Ausbreitung" geändert, sofern der Name nicht "Datentabelle" ist.


Häufige Fehler und Lösungen

  • Fehler: "Laufzeitfehler 1004: Der Name ist ungültig."

    • Lösung: Stelle sicher, dass der neue Name "Ausbreitung" nicht bereits in der Arbeitsmappe existiert. Excel erlaubt keine doppelten Tabellennamen.
  • Fehler: "Laufzeitfehler 9: Index außerhalb des gültigen Bereichs."

    • Lösung: Überprüfe, ob Du dich tatsächlich auf dem richtigen Tabellenblatt befindest und dass die Tabelle, die Du umbenennen möchtest, existiert.

Alternative Methoden

Neben der Verwendung von VBA kannst Du auch die Funktion "Tabelle umbenennen" manuell nutzen:

  1. Klicke mit der rechten Maustaste auf den Tabellennamen.
  2. Wähle Umbenennen.
  3. Gib den neuen Namen "Ausbreitung" ein und drücke Enter.

Diese Methode ist einfach, jedoch nicht automatisiert und erfordert manuelle Eingriffe.


Praktische Beispiele

Angenommen, Du hast eine Excel-Datei mit den Tabellen "Tabelle1" und "Datentabelle". Mit dem obigen Makro wird "Tabelle1" in "Ausbreitung" umbenannt, während "Datentabelle" unberührt bleibt.

Wenn Du das Makro mehrmals ausführst, wird "Tabelle1" jedes Mal in "Ausbreitung" umbenannt, solange der Name nicht bereits vorhanden ist.


Tipps für Profis

  • Benennungskonventionen: Halte Dich an einheitliche Namenskonventionen, um Verwirrung zu vermeiden.
  • Fehlerbehandlung: Integriere Fehlerbehandlungsroutinen in Dein Makro, um unerwartete Fehler abzufangen.
  • Dokumentation: Kommentiere Deinen Code, um die Funktionsweise für andere (oder Dich selbst) verständlich zu machen.

FAQ: Häufige Fragen

1. Wie kann ich sicherstellen, dass das Makro nur auf bestimmten Blättern ausgeführt wird? Du kannst Bedingungen hinzufügen, um das Makro nur auf bestimmten Tabellennamen auszuführen.

2. Was passiert, wenn ich das Makro auf einer anderssprachigen Excel-Version ausführe? Es kann zu Problemen kommen, da einige Tabellennamen in verschiedenen Sprachen unterschiedlich sind. Stelle sicher, dass die Namen in der Sprache übereinstimmen, die Du verwendest.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige