Das Archiv des Excel-Forums

Speichern, Meldung unterdrücken

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Speichern, Meldung unterdrücken
von: Joerg

Geschrieben am: 30.09.2003 11:37:17

Hallo,

mit folgendem Makro führe ich per CommandButton eine Speicherung des aktuellen Arbeitsblattes durch.
Wie kann ich die jedesmal auftauchende Meldung : " Eine Datei diesen Names existiert schon..... Soll sie ersetzt werden ?" unterdrücken, so dass direkt ohne Nachfrage abgespeichert wird ?

Danke Joerg


Private Sub Speichern()
Dim Name As Range
Dim Datum As Range
Set Name = Range("B2")
Set Datum = Range("B3")
ActiveWorkbook.SaveAs Name & (" ") & Format(Datum, "DD-MM-YY") & (".xls")
End Sub

Bild


Betrifft: AW: Speichern, Meldung unterdrücken
von: Panicman
Geschrieben am: 30.09.2003 11:40:12

Hallo Joerg,

das müßte so gehen:


Private Sub Speichern()
Dim Name As Range
Dim Datum As Range
Set Name = Range("B2")
Set Datum = Range("B3")
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Name & (" ") & Format(Datum, "DD-MM-YY") & (".xls")
Application.DisplayAlerts = True
End Sub



Gruß
Holger


Bild


Betrifft: AW: Danke
von: Joerg
Geschrieben am: 30.09.2003 13:09:40

Hallo,

funktioniert einwandfrei

Danke


Bild


Betrifft: Bitteschön !!! o.T.
von: Panicman
Geschrieben am: 30.09.2003 14:20:52




 Bild

Excel-Beispiele zum Thema " Speichern, Meldung unterdrücken"

Text in NotePad schreiben, speichern, in Excel aufrufen download Auswahl in andere Arbeitsmappe kopieren, speichern, schließen download
Dateien öffnen, Verknüpfungen aktualisieren, speichern, schießen download Nur speichern, wenn alle Formularfelder ausgefüllt sind download
Fehlermeldung #NV ausblenden download Fehlermeldung abfangen download
Fehlermeldung #DIV/0! verhindern download Fehlermeldung abfangen und in sequentielle Datei schreiben download
Meldung bei Werteänderung download Geburtstagsmeldung bei Öffnen der Arbeitsmappe download
VBA-Fehlermeldungen auflisten download Alle Zellen mit der #BEZUG!-Fehlermeldung auswählen download
Zahlenstring mit Formel auslesen und Fehlermeldung verhindern download Bei Stundeneintrag Meldung bei Grenzüberschreitung download
Prüfung, ob Datei existiert und bei nein Meldung download Terminmeldung beim Öffnen der Arbeitsmappe download
Sortierspaltenkopf vorgeben und Meldung in Statusleiste für 2 sec. download Meldung nach Einfügen oder Löschen von Zeilen download
Makro mit Excape-Taste ohne Fehlermeldung beenden download Prüfung, ob Daten schon vorhanden und Meldung download
Meldung nach vorgegebener Minutenzahl download Meldung bei Datumsüberschreitung download
Meldung bei Überschreitung einer Spaltensumme download Werteprüfung und -meldung bei Zelleingaben download
Meldung beim Öffnen und bei Zellauswahl in Spalte A download Ein Meldungsfenster für 5 Sekunden anzeigen download
Meldung bei Blattwechsel download Fehlermeldung, wenn nicht der erwartete Wert eingetragen wird download