Innerhalb einer Excel Arbeitsmappen kann man die einzelnen Tabellen fortlaufend nummerieren lassen.
Das Makro dafür lautet:
Sub Nummerierung() Dim i As Long For i = 1 To Sheets.Count Sheets(i).Name = "CW" & i '+ 1 Next End Sub
Innerhalb des Codes ist CW durch den von euch gewünschten Namen zu ersetzen.