Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1232to1236
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

VBA: Tabellennamen ändern

VBA: Tabellennamen ändern
Fritz_W
Hallo Forumsbesucher,
mit welchem Makro kann ich bei allen Tabellenblättern, die mit 1 enden um diesen Buchstaben kürzen.
Beispiele: Aus A1 wird A, aus B241 wird B24 usw.
Vielen Dank für Eure Unterstützung.
mfg
Fritz

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: VBA: Tabellennamen ändern
19.10.2011 19:27:10
Sheldon
Hallo Fritz,
mit diesem hier:

Sub Test()
Dim oSh As Worksheet
For Each oSh In Worksheets
If Right(oSh.Name, 1) = "1" Then
oSh.Name = Left(oSh.Name, Len(oSh.Name) - 1)
End If
Next oSh
End Sub
Gruß
Sheldon
AW: VBA: Tabellennamen ändern
19.10.2011 19:30:55
Fritz_W
Hallo Sheldon,
super, vielen Dank.
Gruß
Fritz
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige