Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
992to996
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
992to996
992to996
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Tabellenblattname autom. in Zelle schreiben.

Tabellenblattname autom. in Zelle schreiben.
13.07.2008 15:49:00
M
Hallo,
gibt es eine Möglichkeit den Namen eines Tabellenblattes automatisch in eine Zelle des Entsprechenden Tabellenblattes zu schreiben? Ich habe eine Exceltabelle, in der die Tabellenblätter automatisch erzeugt werden und auch automatisch benannt werden. dieser Name soll dann auch in der Zelle A1 des Tabellenblattes reingeschrieben werden.
Würde mich über hinweise sehr freuen.
Danke und Gruß
Marc

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

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblattname autom. in Zelle schreiben.
13.07.2008 15:52:54
Mister
Hallo
Als Ansatz:

Sub WriteName()
Worksheets(1).Range("A1") = Worksheets(1).Name
End Sub


Gruß
Martin

oder noch eleganter...
13.07.2008 15:54:55
Mister

Sub WriteName()
With ActiveSheet
Range("A1") = .Name
End With
End Sub


Gruß
Martin

AW: oder noch eleganter...
13.07.2008 16:28:46
Ramses
Hallo
Dann aber doch gleich so ohne das ganze drum herum :-)

Sub WriteName()
[a1]= ActiveSheet.Name
End Sub


Gruss Rainer

Anzeige

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige