Tab umbenennen aus Zelle bei Aktivierung

Bild

Betrifft: Tab umbenennen aus Zelle bei Aktivierung
von: Werner
Geschrieben am: 04.09.2015 11:40:05


Hallo Excel-Freunde,
ich bin auf der Suche nach einer Möglichkeit,
beim Aktivieren eines Tabellenblattes
diesen Tab umzubenennen.
Der Name in jedem Tabellenblatt steht jeweils
in der Zelle E5
Ich habe es mit folgendem Code probiert

Private Sub Worksheet_Activate()
ActiveSheet.Name = Range("e5")
End Sub

laufe aber auf den Fehler
Laufzeitfehler 3 - Typen unverträglich
Kann jemand helfen ?
Vorab vielen Dank
Gruss
Werner

Bild

Betrifft: was steht denn in E5 evtl. ungültige Zeichen? owT
von: Matthias L
Geschrieben am: 04.09.2015 11:46:13


Bild

Betrifft: noch ein Hinweis
von: Matthias L
Geschrieben am: 04.09.2015 12:00:45
Hallo
Du willst das ja bei allen Tabellenblättern so machen, richtig?
Den Code würde ich dann nur einmal schreiben.
In DieseArbeitsmappe

Option Explicit
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
 If Range("e5").Value <> "" Then ActiveSheet.Name = Range("e5").Value
End Sub
Funktioniert bei mir ohne Probleme.
Evtl. auch noch die Länge des einzutragenden Tabellennamen prüfen, da gibts ja auch ein Limit
Gruß Matthias

Bild

Betrifft: AW: noch ein Hinweis
von: Werner
Geschrieben am: 04.09.2015 14:08:49
Hallo
aus meiner Sicht kein fehlerhaftes Zeichen sondern
#NV
Das muss ich noch "wegbekommen" ... wird aber wohl erst am Montag möglich sein.
Danke Dir für Deinen Code - JA, ich will das bei mehreren Tabellenblättern machen
Feedback folgt
Gruss
Werner

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Tab umbenennen aus Zelle bei Aktivierung"