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

Forumthread: Tabellenblattnamen für alle Blätter aus Zelle

Tabellenblattnamen für alle Blätter aus Zelle
07.07.2015 10:19:44
Matthias
Hallo Wissende,
ich hab folgendes Problem, welches Makro kann
per Knopfdruck aus einer Zelle den Eintrag als
Tabellenblattname nehmen.
Also Zentral für alle Tabellenbätter,
steht der Name in Zelle C3
Ich hoffe hab mich einigermaßen klar ausgedrückt,
für ein einzelnes Blatt krieg ich es hin, aber nicht
für alle Blätter auf einmal.
Vielen Dank im Voraus.
Matthias

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Nutze RECHERCHE.....owT
07.07.2015 10:34:19
robert

AW: Tabellenblattnamen für alle Blätter aus Zelle
07.07.2015 10:38:47
Bernd
Hallo!
Sub RenameTabs()
For x = 1 To Sheets.Count
If Worksheets(x).Range("C3").Value  "" Then
Sheets(x).Name = Worksheets(x).Range("C3").Value
End If
Next
End Sub

Rückmeldung wäre nett !!! 


>>> mfg Bernd <<<

Sicher ist, dass nichts sicher ist. Selbst das nicht.

Anzeige
nur Worksheets - nicht Sheets
07.07.2015 10:56:36
Matthias
Hallo Bernd
Nimm mal eine neue Datei mit 3 Tabellenblättern
Natürlich jeweils C3 mit erlaubten Blattnamen füllen.
Zwischen Tabelle1 und Tabelle2 erstellst Du ein leeres Diagramm
Nun lass Deinen mal Code laufen
Du solltest also generell Worksheets benutzen, sonst kanns auch mal schief gehen.
Gruß Matthias

Anzeige
AW: nur Worksheets - nicht Sheets
07.07.2015 11:01:02
Bernd
Hallo Matthias!
hast recht. Danke für den Hinweis, habe es geändert.
mfg Bernd

AW: Tabellenblattnamen für alle Blätter aus Zelle
07.07.2015 12:24:15
Matthias
Hallo Bernd und Matthias,
danke für eure Hilfe, hab den Code
angepasst,
funktioniert super
Sub RenameTabs()
For x = 1 To Worksheets.Count
If Worksheets(x).Range("C3").Value  "" Then
Worksheets(x).Name = Worksheets(x).Range("C3").Value
End If
Next
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

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