ich möchte ein einzelnes Tabellenblatt ohne Formeln,
Buttons, Verweisungen usw. als *.xls speichern.
Wenn ich diesen Code verwende, hängt sich der Rechner auf?
Ich kann noch noch mit dem Taskmanager dieses Excelfile beenden!
Was mache ich verkehrt? oder wie geh´s anders?
Sheets("tabelle1").Copy
ActiveSheet.Cells = ActiveSheet.Cells.Value
DatName = "Serie 40Schuß-" & Date
ActiveWorkbook.SaveAs Filename:= "C:\Dokumente und Einstellungen\Andreas\Eigene Dateien\" & DatName & ".xls"
Gruß
Andreas W.