Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1028to1032
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

Tabellen umbennen

Tabellen umbennen
05.12.2008 18:09:18
Claudia
Hallo,
ich habe ein Problem:
Ich habe eine Datei mit vielen Tabellen, die benannt sind nach Tabelle 1, Tabelle 2, Tabelle 3 usw.. Alle Tabellen sollen nun sprehende Namen erhalten, genauer geasgt abgeleitet aus der Zelle A1 der entsprechenden Tabelle. Wie kann ich das lösen, außer dass ich mich jetzt händisch dran setze. :-(
Vielen Dank schon mal.
Viele Grüße
Claudia

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

Betreff
Datum
Anwender
Anzeige
AW: Tabellen umbennen
05.12.2008 18:14:00
Gerd
Hi,

Sub so()
Dim Ws As Worksheet
For Each Ws In ThisWorkbook.Worksheets
On Error Resume Next
Ws.Name = Ws.[a1]
Next
End Sub


mfg Gerd

Toll, danke!
05.12.2008 18:38:40
Claudia
Hast mir eine Menge Arbeit erspart.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige