Live-Forum - Die aktuellen Beiträge
Datum
Titel
22.10.2025 19:40:18
Prüfen ob Datei offen
22.10.2025 19:07:50
Bedingtes kopieren in andere A.-Blätter u. VBA Anpassungen
22.10.2025 16:04:18
Auswahl der Datenüberprüfung auf Folgezellen übertragen
22.10.2025 15:36:11
wie oft kommt ein Buchstabe in einem Array vor, Zählenwenn
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
224to228
224to228
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

bevor save

Forumthread: bevor save

bevor save
26.02.2003 20:47:06
Wolfgang
Hallo Helfer

Ich komm nicht drauf  

Ich möchte vor dem Speichern einer Datei eine Abfrage durchführen.

nach dem Motto: wenn Zelle [a1] <> 0
dann kein Speichern möglich.


könnte mir jemand einen Rumpfcode anbieten


vorab an Alle vielen Dank

Gruß Wolfgang



Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: bevor save
26.02.2003 20:49:22
Ramses

Hallo Wolfgang,

Diesen Code in "Diese Arbeitsmappe" kopieren:

Gruss Rainer

Re: bevor save
26.02.2003 20:49:36
Hajo_Zi

Hallo Wolfgang

Gruß Hajo

Re: bevor save
26.02.2003 20:52:01
Felix

Hallo Wolfgang,
diesen Code in Diese Arbeitsmappe:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If Sheets(1).Range("A1").Value = "" Then Cancel = True
End Sub

Gruß
Felix

Anzeige
Re: bevor save
26.02.2003 20:57:57
Jens Huthmann

Hallo Wolfgang,

füge diese Prozedur in das Modul "Diese Arbeitsmappe" ein:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If Sheets("Tabelle1").Range("a1") <> 0 Then
MsgBox "Speichern nicht möglich"
Cancel = True
End If
End Sub


Gruß
Jens Huthmann

EDV-Schulung und IT-Dienstleistungen
www.jhuthmann.de


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