ich habe eine Ausgangsdatei von der ich 3 Blätter in eine neue Datei wegspeichern möchte.
Da dies in VBA geschieht, sollen keinerlei Abfragen erscheinen.
Also: die drei Blätter werden mit
Sheets(Array("Legende", "Platt_V", "Platt_K")).Copy
With ActiveWorkbook
.SaveAs Filename:="C:\Test\NeueDatei.xls"
.Sheets("Platt_V").Select
.Sheets("Platt_V").Name = "Plattform Verlängerung"
.Close savechanges:= False
End With
erstellt und gespeichert. Allerdings funktioniert die Umbennung des Blattes "Platt_V" nicht.
Warum ?
Kann mir da jemand helfen?
Gruß,
Ptonka