hab in der Forumsliste gesucht, aber nichts passendes gefunden.
arbeite derzeit mit
On Error Resume Next
ActiveWorkbook.SaveAs Filename:="Zeiterfassung " & speichername & ".xls", FileFormat:=xlNormal
On Error GoTo 0
Dieser Fehler betrifft den Fall, dass die Datei bereits vorhanden ist und die ÜBerschreibe?-Meldung erscheint. Wenn auf "Ja" geklickt wird, tritt der Fehler natürlich nicht auf. Bei einem Klick auf "Nein" oder "Abbrechen" kommt ein Laufzeitfehler.
Wie kann ich den Fehler abfangen und den Code auf die weithin bekannten Funktionen erweitern. Und zwar,dass bei Klick auf "Abbrechen" der Code übersprungen wird (müsste ja mit "On Error Resume Next" gehen) und bei Klick auf "Nein" das Speichern unter Fenster geöffnet wird und ein neuer Pfad und Dateiname vergeben werden kann. Weitergehend sollte natürlich mit Klick auf "Abbrechen" in dem Speichern-Unter-Fenster auch die Speicherprozedur abgebrochen werden und wiederum kein Fehler ausgegeben werden.
Puuh. So ich hoffe das war verständlich. habe in einem anderen Projekt mit dem Pfadfenster gearbeitet. Dort konnte man nur den Pfad auswählen. Nun aber brauch ich das bekannte "Speichern-Unter"-Fenster...
Gibts da ne Lösung für?
MfG
Beffen