Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1192to1196
1192to1196
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

speichern unter Dialog

Forumthread: speichern unter Dialog

speichern unter Dialog
Beffen
Hallo nochmal. Die Probleme hören nicht auf ^^
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
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: speichern unter Dialog
10.01.2011 10:33:17
Marc
Guten Morgen!
Kannst du dann nicht einfach mit dem "Speichern-unter-Fenster" arbeiten?
Sub test()
antw = application.Dialogs(xlDialogSaveAs).Show
if Antw  vbok then
msgbox "Fehler"
end if
End Sub

Gruß, Marc
AW: speichern unter Dialog
10.01.2011 10:35:30
Rudi
Hallo,
teste mal: 
Sub ttt()
If Dir("Zeiterfassung " & speichername & ".xls") = "" Then
ActiveWorkbook.SaveAs Filename:="Zeiterfassung " & speichername & ".xls", FileFormat:= _
xlNormal
Else
With Application.FileDialog(2)
.InitialFileName = "Zeiterfassung " & speichername & ".xls"
If .Show  -1 Then
MsgBox "Datei nicht gespeichert"
End If
End With
End If
End Sub

Gruß
Rudi
Anzeige
DANKE!!
10.01.2011 13:56:54
Beffen
Hallo Rudi, Hallo Marc
Danke für die Hilfe. Funktioniert Tadellos!
Danke Danke!
Gruß Beffen
;

Forumthreads zu verwandten Themen

VBA-Code - Datei speichern unter; Schleife
Schulze

Halli Hallo,
ich habe eine kurze frage. und war geht es darum, dass die spalte a untersucht werden sollen. es sollen alle werte der tabelle (zeilen) kopiert werden, bis in der spalte a der wert 0 ist.
Im Folgenden habe ich eine Beispieldatei drangehangen. https://www.herber.de/bbs/user/...
21.08.2008 10:57:00
Thread-ID: 1003407
2 Beiträge
Anzeige
Speichern-unter Dialog
steffen

Hallo,
wie kann ich es anstellen, dass im Speichern-Unter-Dialog
Application.Dialogs(xlDialogSaveAs).Show
kein Dateiname vorgegeben wird, also das Feld "Dateiname" leer ist?
Toll wäre noch, das Abbrechen des Dialogfensters zu unterbinden, so dass man gezwungen wird, einen Date...
06.10.2008 14:49:20
Thread-ID: 1014454
5 Beiträge
Anzeige
VBA Speichern unter
PeterO

Hallo!
Ich habe folgendes Problem:
über einen Commandbutton kopiert der User ein Blatt in eine neue Datei, die so dann gleich geschlossen werden soll. Hier erscheint dann der Dialog "Wollen Sie speichern? - ja - nein - abbrechen -". Ich hätte nun aber gern, dass gleich der Dialog "Speic...
28.10.2008 15:59:44
Thread-ID: 1019997
3 Beiträge
Anzeige
VBA Speichern unter
BuStue

Hallo Leute, schönen Guten Morgen.
KAnn man folgenden Code so umdrehen, das der Inhalt der Zelle D4 vor dem Blattnamen abgespeichert wird,
ActiveWorkbook.SaveAs SavePath & "\" & ActiveSheet.Name & " " & ThisWorkbook.Sheets("Bestandsübersicht").Range("D4").Value & "....
26.03.2009 07:58:29
Thread-ID: 1064084
4 Beiträge
Anzeige
VBA Speichern unter
Alexander

wie kann ich bei folgendem "speichern unter" das Abbrechen unterdrücken/deaktivieren da ich sonst eine fehlermeldung bekomme ? Sub Exportieren Aktualiesieren() ' Kopieren aktueller stand in alten Stand Range("A6:L98").Copy Sheets("Alter Stand").Select Range("a4").PasteSpecial Paste:=xlPasteValu...
25.07.2009 10:08:55
Thread-ID: 1091205
2 Beiträge
VBA - Mehrere Ordner auswählen + Pfade speichern
Thomas

Hallo,
der Betreff sagt eigentlich schon alles:
ich möchte ein Dialogfenster öffnen, in dem man mehrere Ordner (nur die Ordner, nicht deren Inhalt) auswählen kann und dann deren Pfad in einem Array gespeichert haben.
Ich habe es schon mit "msoFileDialogFolderPicker" versucht, nur le...
08.10.2009 17:03:03
Thread-ID: 1108139
2 Beiträge
"Datei öffnen"-Dialog mit Pfadvorgabe
Holger

Hallo Excelaner,
wie kann ich eine Application.GetOpenFilename("Dateityp (*.txt; *.log; *.dat),")
Anweisung auf einen fixen Pfad (z.B. "H:/Test/" ) ausführen?
Es soll also im "Datei öffnen"-Dialog der Pfad schon vorbelegt werden.
Für Hilfe wäre ich sehr dankbar!
Gruß Holge...
12.01.2011 14:51:59
Thread-ID: 1195263
6 Beiträge
Speichern unter Dialog ohne Funktion
Beffen

Huhu,
folgende Frage, liebe Experten:
Ich weiss nicht warum, aber der Code
speichername = tb_name.Value
MsgBox speichername
If Dir("Zeiterfassung " & speichername & ".xls") = "" Then
ActiveWorkbook.SaveAs Filename:="Zeiterfassung " & speichername & ".xls"...
19.01.2011 17:23:35
Thread-ID: 1196452
4 Beiträge
Speichern unter - ohne Dialog und ohne...
KLE

...Meldung, wenn Datei bereits vorhanden.
Hi,
...ich möchte gern eine Datei unter einem bestimmten Namen und Pfad speichern.
In dem Ordner wird es bereits eine Datei mit dem gleichen Namen geben, welche ohne Nachfrage/Hinweis überschrieben werden soll.
Wie kann ich das tun -...
25.10.2011 22:36:09
Thread-ID: 1235393
5 Beiträge
Aus Excel Word-Speichern-Unter-Dialog aufrufen
grossermanitu

Hallo,
ich erstelle aus Excel ein Word-Dokument das im Anschluss den Speichern-Unter-Dialog mit vorgegeben Pfad aufrufen soll. Das ganze funktioniert solange keine anderen Word-Dokumente offen sind.
Wie weiße ich nun zu, dass für das Word-Dokument das gerade erstellt wurde der Speicher...
25.06.2012 20:56:53
Thread-ID: 1268683
3 Beiträge
VBA Verzeichnis auswählen
PeTeR

Hallo VBA-Freaks,
ich suche nach einem Dialog zur Auswahl eines Verzeichnisses (nicht Datei!), aber mit Anzeige der darin enthaltenen Dateien.
Getopenfilname - muss ich eine Datei auswählen!
FileDialog(msoFileDialogFolderPicker) - sehe ich die Dateien im Verzeichnis nicht!
Viele...
04.12.2013 09:27:16
Thread-ID: 1341172
3 Beiträge
VBA 5 Dateien auswählen, umbennen und speichern
D.Hensel

Hallo, habe ein Problem mit folgendem Makro. Erhalte einen Debug Fehler bei " wb5.Sheets(1).copy Before:=wb1.Sheets(1)" Wenn ich Before und after lösche, dann gehts. Dann öffnet er aber mehrere Dateien. Ziel des Makros ist das man 5 Dateien auswählt, das Makro diese öffnet und im selben Work...
25.08.2014 14:02:09
Thread-ID: 1378050
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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