kann ich den Codenamen eines Tabellenblattes variabel ansprechen - z.B. über eine Schleife? (so á la: "Tabelle" & iCount)
Wenn ja: Wie?
Grüße Boris
Sub Change_Codename()
'Neuaufbau aller Tabellennamen und VBA Tabellennamen
Dim i As Integer
For i = 1 To Worksheets.count
With ThisWorkbook.VBProject.VBComponents(Worksheets(i).CodeName)
.Properties("_CodeName").Value = "Tabelle" & i
.Properties("Name").Value = "Tabelle" & i
End With
Next i
End Sub