Microsoft Excel

Herbers Excel/VBA-Archiv

Name des Worksheets in Zelle eintragen

Betrifft: Name des Worksheets in Zelle eintragen von: West
Geschrieben am: 03.09.2004 11:04:35

Hallo, ich schon wieder ;)

ich habe da eine Arbeitsmappe mit ca. 120 Worksheets...
jetzt will ich, dass der mir in jedem Worksheet in Zelle A,1 den namen des sheets ausgibt ... hat da jemand ne lösung für mich?

  


Betrifft: AW: Name des Worksheets in Zelle eintragen von: Dr.
Geschrieben am: 03.09.2004 11:09:10

Sub name()
for i=1 to worksheets.count
[a1]=Sheets(i).Name
next i
End Sub



  


Betrifft: AW: Name des Worksheets in Zelle eintragen von: West
Geschrieben am: 03.09.2004 11:13:28

Hm das war aber nur der Anfang ... bei deinem Makro schreibt er mir nur in das Sheet Client120 in Zelle A,1 Client1 statt Client120 und dann macht er es auch nur für dieses eine sheet und nicht für alle 120 :-(


  


Betrifft: AW: Name des Worksheets in Zelle eintragen von: Dr.
Geschrieben am: 03.09.2004 11:15:28

Ups

Sheets(i).[a1]=Sheets(i).Name

sollte es heissen.


  


Betrifft: DANKE von: West
Geschrieben am: 03.09.2004 11:17:51

dankeschön


  


Betrifft: AW: Name des Worksheets in Zelle eintragen von: Ingo
Geschrieben am: 03.09.2004 11:17:36

Dim i As Integer
For i = 1 To Sheets.Count
Sheets(i).[A1] = Sheets(i).name
Next i
mfG
Ingo Christiansen


 

Beiträge aus den Excel-Beispielen zum Thema "Name des Worksheets in Zelle eintragen"