Blattname nach Zellinhalt
16.01.2005 14:39:11
Dani
Habe ein wohl einfaches Problem, das meine Fähigkeiten anscheinend aber bereits übersteigt.
Ich sollte per makro das aktive blatt nach zelle f16 im selben aktiven blatt benennen.
Habe den folgenden code gefunden, der aber nur läuft, wenn nicht mehr als ein blatt in der mappe liegt; das soll besser werden!
Vielen Dank für Eure geschätzte Hilfe!
Gruss Dani
Sub blattname_zelle()
Sheets(1).Select
B = ActiveSheet.Index
For Each w In Worksheets
Sheets(B).Activate
n = [f16].Value
On Error Resume Next
w.Name = n
Next w
Sheets(1).Select
End Sub
