Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Fehlermeldung beim speichern

Fehlermeldung beim speichern
15.11.2015 10:39:33
Walter
Guten Moprgen zusammen,
ich habe folgendes im Makro:
.....
Else
' Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:= _
"C:\_Test\__Dokumente.wb\Rechnungen alle\" & DateiNam & ".xls", _
FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
End If
ActiveWorkbook.Close False
wenn ich diese Zeile:
Application.DisplayAlerts = False
aktiviere kommt die Abfrage "Nein" oder "Abbrechen", in beiden Fällen
kommt Fehlermeldung:Laufzeitfehler 1004
Die Methode SaveAs ist fehlgeschlagen.
Wenn ich die Zeile aktiviere, wird gespeichert und geschlossen.
Was soll ich ändern ?
Gruß
walter mb

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Fehlermeldung beim speichern
15.11.2015 11:12:11
Herbert
Hallo Walter,
bei mir funzt dein Code einwandfrei. Überprüfe deine Variablen und den Pfad. Es sollte eigentlich klappen.
Servus

Hallo Herbert, versuch es gleich...
15.11.2015 14:25:24
Walter

Leider immer noch Fehlermeldung
15.11.2015 14:33:30
Walter
Hallo Herbert,
leider erscheint immer noch die Fehlermeldung.
mfg
walter mb

Anzeige
Auch mit Variablen und den Pfad nicht
15.11.2015 14:37:14
Walter
Hallo,
habe ein Makro aufgezeichnet also ohne Variablen, leider Fehlermeldung
bei NEIN und auch Abbrechen.
gruß
walter mb

Ich habe es anders gelöst, DANKE Herbert -)
15.11.2015 15:07:41
Walter
Hallo Herbert,
habe es so gelöst:
Antwort = MsgBox("Möchten Sie die Rechnungs-Datei beenden" & Chr(13) & _
Chr(13) & "oder" _
& Chr(13) & Chr(13) & "offen lassen ? " _
& Chr(13) & Chr(13) & "Beenden dann > JA drücken" _
, vbCritical + vbYesNo, "Speichern und Schließen")
If Antwort = vbNo Then
Exit Sub
Else
MsgBox "es wird geschlossen"
ActiveWorkbook.Close False
End If
End If
gruß
walter mb
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige