Danke.
Wei0t du auch wie ich das in ne for-schleife verpacke, die von Blatt 3 bis Ende durchläuft?
Gruß Gerd
AW: Zellwert = Blattname
Dr.
Sub blattname()
For i = 3 To Sheets.Count
Sheets(1).Range("A" & (i - 2)) = Sheets(i).Name
Next i
End Sub
AW: Zellwert = Blattname
11.08.2004 10:14:47
Gerd
Ja, isches fast.
Leider läuft es nicht. Konkret brauche ich den Zellwert für C5.
Muss es nicht auch sheets(i).range... heißen?
Danke nochmals für deine Hilfe...
AW: Zellwert = Blattname
Dr.
Hi, ich weiss ja nicht, was Du da anstellst, aber Code läuft sauber durch!
Danke
11.08.2004 10:34:27
Gerd
So läufts bei mir:
For i = 3 To Sheets.Count
Sheets(i).Range("C5") = Sheets(i).Name
Next i
Danke für die Hilfe.