Workbook überschreiben
20.02.2003 10:13:13
Bernhard
habe folgendes Script (Auszug):
Workbooks.Add
ActiveSheet.PageSetup.PrintArea = ""
With ActiveSheet.PageSetup
.......'nicht relevant
End With
ActiveWorkbook.SaveAs Filename:="D:\KalkulationKA.xls", FileFormat:=xlNormal
Da die Datei jedesmal auf den gleichen Pfad und Namen hin gespeichert wird kommt ab dem 2.ten mal die Frage, ob die existierende überschrieben werden soll. Ich bräuchte nun den Befehl das es immer überschrieben wird ohne nachzufragen!
Thanx im voraus.