Probleme beim Speichern meines Projektes
30.10.2016 21:15:56
Jascha
ich habe folgenden Code bereits erstellt:
Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
savedFile = Application.GetSaveAsFilename(InitialFileName:=[AG3], fileFilter:="Excel- _
Arbeitsmappe mit Makros, *.xlsm")
If savedFile "Falsch" Then ActiveWorkbook.saveAs savedFile
Application.DisplayAlerts = True
End Sub
dieser funktioniert auch soweit einwandfrei.
Ich habe folgende Anforderungen:
1.Immer beim schließen speichern. (funktioniert)
2.Keine Nachfrage ob Datei überschrieben werden soll. (funktioniert)
3.Speichern mit dem Namen des Zellinhaltes AG3. (funktioniert)
4. Nun ändert sich der Name der Datei (Zelle AG3) und die alte bestehende Version soll automatisch überschrieben werden. Das geht leider nicht und ich bin ratlos.
Vielleicht könnt ihr mir dabei helfen.
Vielen Dank :)
Anzeige