Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1128to1132
1128to1132
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Registerblattname automatisch ändern | Herbers Excel-Forum

Forumthread: Registerblattname automatisch ändern

Registerblattname automatisch ändern
17.01.2010 01:43:42
Christian Wendker

Hallo Spezilisten!
Habe ein Problem mit den Registerblattnamen. Ich habe auf der ersten Registerkarte eine Liste mit Namen und möchte jetzt die folgenden Registerkarten nach diesen Namen benennen. Außerdem sollen diese sobald ich einen Namen in der Liste ändere automatisch mit geändert werden.
Wer kann mir helfen?
Vielen Dank schon mal.
Christian

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Registerblattname automatisch ändern
17.01.2010 08:54:54
Hajo_Zi
Hallo Christian,
benutze das Change Ereignis der Tabelle. 
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 Then
Worksheets(Target.Row).Name = Target
End If
End Sub

Ich habe jetzt keine Fehlerbehandlung eingebaut.

Anzeige
AW: Registerblattname automatisch ändern
17.01.2010 10:41:20
Beverly
Hi Christian,
hier noch ein erweiterter Code, damit kein Fehler ausgelöst wird falls der Blattname bereits existiert: 
Option Explicit
Dim strTarget As String
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 Then
Application.EnableEvents = False
On Error Resume Next
Worksheets(Target.Row).Name = Target
On Error GoTo 0
If Application.CountIf(Columns(1), Target) > 1 Then
MsgBox "Ein Tabellenblatt mit dem Namen '" & Target & "' gibt es bereits"
Target = strTarget
Target.Select
End If
Application.EnableEvents = True
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count = 1 Then strTarget = Target
End Sub

Anzeige
AW: Registerblattname automatisch ändern
18.01.2010 12:39:40
Christian Wendker
Vielen Dank,
das klappt hervorragend.
;

Forumthreads zu verwandten Themen

Blätter automatisch umbenennen
Wolfgang

Hallo Ihr lieben Spezialisten,
ich möchte ein Makro erstellen, das die Blätter automatisch umbenennt. Das erste Blatt soll den Namen 1 erhalten, das zweite den Namen 2, usw. Es können bis zu 15 Blätter vorhanden sein.
Mit der Möglichkeit Makros aufzuzeichnen, kann ich zwar automatisch e...
20.02.2010 12:20:35
Thread-ID: 1139898
8 Beiträge
Anzeige
Automatische Änderung "Name Tabellenblatt"
Wolfgang

Hallo an alle,
ich habe folgendes Problem: wenn in L7 der Wert geändert wird, soll automatisch der Name des
Tabellenblattes geändert werden.
Beispiel: L7 = 2010, wird geändert auf 2011: Der Name des Tabellenblatt's soll nun ebenfalls 2011 sein.
Wie kriege ich das hin?
Mit Gr...
20.11.2010 16:46:20
Thread-ID: 1187949
3 Beiträge
Automatisches Umbenennen von Tabellenblätter
Tabellenblätter

Hallo Excel Freunde
Ich habe eine Tabelle mit ca. 250 Namen.
Nun möchte ich für jeden Namen ein eigenes Tabellenblatt einrichten. anstatt Tabelle1, Tabelle2 soll der Name erscheinen.
Ist es möglich dies per „Befehl“ auszuführen. Ist es weiterhin möglich dies noch per Hyperlink (pro...
21.06.2012 15:09:53
Thread-ID: 1268303
7 Beiträge
Anzeige
Alle tabellenblätter nach zelleninhalt durchsuchen
Spenski

Hallo
Im tabellenblatt "Daten" steht in A1 eine 9 stellige nummer.
Gibt es eine Möglichkeit in B1 sich anzeigen zu lassen wie oft der zelleninhalt A1 in der spalte c aller anderen tabellenblätter vorkommt?
Es kommen jede Woche 2 neue tabellenblätter dazu , und 2 werden gelöscht. Am...
25.07.2014 21:34:56
Thread-ID: 1372395
24 Beiträge
Tabellenblätter automatisch erstellen und benennen
Bonduca

Hallo,
ich habe folgendes Problem:
In Tabelle 1 sind in der Spalte B (ab B4) Bezeichnungen. Die Anzahl dieser kann variieren. Mit diesen Bezeichnungen sollen neue Tabellenblätter automatisch erstellt werden.
In der Beispieldatei habe ich bereits die Tabellenblätter angelegt.
Auß...
24.02.2015 19:51:33
Thread-ID: 1411292
5 Beiträge
Neues Blatt automatisch erstellen und umbenennen
Jean
Liebe Forums-user,
ich habe folgendes, mehr oder weniger schwieriges Problem:
Ich habe in einem Blatt 1 Kontobewegungen. Jede Kontobewegung wird dabei u.a. einer Kategorie zugeordnet. Für jede Kategorie soll ein eigenes Blatt bestehen, in dem dann nur die entsprechenden Kontobewegungen dies...
09.03.2015 18:02:51
Thread-ID: 1413829
7 Beiträge
Namen automatisch vergeben aufgrund Tabellennamen
Jason

Hallo Wissen!
In einem Tabellenblatt habe ich 12 Spalten (A:L). In der Spalte J steht jeweils der Name des Projektleiters. Mit folgendem Makro werden die Daten gefiltert und automatisch ein separates Tabellenblatt pro Projektleiter erstellt. Anschliessend habe ich die Wahl, ob ich jedes Tab...
30.07.2015 08:20:09
Thread-ID: 1439303
3 Beiträge
Zelle nicht auswählbar nach Blattschutz
Jones

Guten Tag zusammen.
Ich bin auf folgendes Problem gestoßen.
So sieht mein Tabellenblatt aus:
https://www.herber.de/bbs/user/105101.jpg
Ich habe alle Zellen gesperrt, bis auf die 6 leeren auf der rechten Seite.
Die vierte leere Zelle ist mit einem DropdownMenü versehen und so...
20.04.2016 11:05:02
Thread-ID: 1489127
9 Beiträge
Dateiname automatisch vergeben-Fehler?
Andi

Um einen Dateinamen automatisch vergeben zu wollen- habe ich folgende Lösung.
Dieser wird aus zwie Zellen zusammengesetzt.
https://www.herber.de/bbs/user/110005.xlsm
Allerdings muss ich irgend einen Dateinamen eintragen- damit der Zell Text als Dateiname verwendet wird. Damit wi...
14.12.2016 19:53:50
Thread-ID: 1530206
4 Beiträge
Blattname nach Zellenname benennen
Mike

Hallo zusammen,
ich habe in D1 die Formel stehen => =A11 (dort steht der jeweilige Monatserste z.B. 01.01.2002). Zu sehen ist in D1 der Monatsname. Formatiert ist diese Zelle => MMMM.
Wie kann man jetzt erreichen, dass das Blatt nach dem jeweiligen Monatsnamen benannt wird?Gruß Mike
08.09.2002 20:24:20
Thread-ID: 157666
2 Beiträge
pdf erstellen - Dateinamen automatisch vergeben
Hoppe

Hallo!Mit folgendem Code erstelle ich "auf Knopfdruck" eine pdf-Datei:Private Sub CommandButton3_Click()
Sheets("charts").Select
Application.ActivePrinter = "Acrobat PDFWriter on LPT1:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"Acrobat PD...
13.09.2002 15:38:59
Thread-ID: 159788
2 Beiträge
Tabellenblattname automatisch aus Zelleninhalt
Alex

Hallo Excel-Gemeinde,
ich habe ein VBA-Code in einem Tabellenblatt, dass mir den Namen des Tabellenblattes entsprechend einem Zelleninhalt ändert. Das ganze funktioniert auch. Es beruht aber auf dem manuellen Eintragen der Daten in die Zelle. Durch dieses Ereignis wurde dann der Name des Te...
05.01.2018 12:38:32
Thread-ID: 1600361
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige