Hallo liebe Excel-Mitstreiter,
Weil man es so wollte, habe ich in einer Tabelle einen separaten Schalter „Speichern unter“ angebracht. Dieser ist mit folgendem Makro hinterlegt:
Sub SpeichernUnter()
ChDir „“
ChDrive „c:“
Dateiname = Application.GetSaveAsFilename _
(„Name des Kunden“, „Micrsoft Excel-Dateien (*.xls),*.xls“)
ActiveWorkbook.Saveas Dateiname
End Sub
Klappt auch alles, ABER…
Ist die Datei bereits vorhanden und ich beantworte den Warnhinweis mit NEIN, oder mit ABBRECHEN, kommt der VB-Laufzeitfehler 1004, mit dem Hinweis die Methode SAVEAS … ist fehlgeschlagen.
… und Debuggen soll der Anwender an dieser Stelle nun wirklich nicht.
Für eine freundliche Unterstützung und/oder Hilfestellung danke ich im Voraus.
Herzlichst, Euer Excel-Geplagter Carlo