Excel SaveAs sagt geht nicht ?

Computer: Software & Programmierung Office Software
1

…Datei ist Schreibgeschützt
Die Datei hat aber keinen Schreibschutz ?

was ist falsch ?

mein Code:
Application.DisplayAlerts = false
ActiveWorkbook.SaveAs Filename:=Zielpfad & DATEINAME

Danke
PS Wenn die datei nicht vorhanden ist geht es

2

…Datei ist Schreibgeschützt
Die Datei hat aber keinen Schreibschutz ?
mein Code:
Application.DisplayAlerts = false
ActiveWorkbook.SaveAs Filename:=Zielpfad & DATEINAME
PS Wenn die datei nicht vorhanden ist geht es

Hi Sam,
da bei mir der Code:

Sub test()
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=„c:\temp\5915.xls“
End Sub

mehrfach nacheinander funktiniert, also die datei ab dem ersten Durchlauf ja schon gespeichert ist, habe ich ohne Ahnung eine vage Vermutung.
In der Hilfe zu SaveAs steht folgendes bei einem Parameter:

WriteResPassword Variant optional. Eine Zeichenfolge, die das Kennwort für die Schreiberlaubnis der Datei angibt. Wenn eine Datei mit einem Kennwort gespeichert und das Kennwort beim Öffnen nicht angegeben wird, wird die Datei schreibgeschützt geöffnet.
Gruß
Reinhard