der zu vergebende name, steht in Tabelle1 in Zelle C9 !
hast Du Dich mal in der Recherche oder dem Archiv umgesehen? Dort wirst Du mit Sicherheit fündig.
Gruß
Peter
Option Explicit
Sub neuesBlatt()
Dim WS As Worksheet
Set WS = Worksheets.Add
With WS
.Name = Sheets("Tabelle1").[c9]
.Move after:=Sheets(Sheets.Count)
End With
End Sub
in der Recherche hab ich so was ähnliches gefunden.
Da werden aber Tabellenblätter kopiert und mit einem Namen versehen.
Ich will aber ein neus Tabellenblatt anlegen und einen neuen Namen zuweisen!
vielen Dank, das haut hin!
vielen Dank, das klappt!
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen