Office: nach beforeSave das Speichern verhindern

Hallo Community,

ich hab ein kleines VBA in Excel97 geschrieben. Dieses Makro wird duch das Speichern (beforeSave-Methode) aufgerufen.
Nun habe ich folgendes Problem.
Wenn nun im Makro ein Fehler auftritt, springe ich zu einer Fehlerverarbeitung und beende das VBA. Leider wird aufgrund der beforeSave-Methode trotzdem gespeichert. Dieses Verhalten entspricht nicht ganz meinen Wünschen und so bin ich jetzt auf der Suche nach einer Lösung.

Vielen Dank für euere Hilfe

Grüße


Code:

Aufruf des VBA
Code:

Fehlerverarbeitung:
Code:

:)

 

Hallo

das Makro "mainsec" sehe ich nicht und was hat das Makro "FehlerVerarbeitung" damit zu tun?




Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem NT4 SP6 und Excel Version 2000 SP3

 

Hallo,

schon mal danke für deine Antwort,

das komplette Macro schreib ich jetzt mal besser nicht hier rein, ist doch recht lang und hat mir der grundlegenden Problemstellung nix zu tun.

Mainsec stellt meine Hauptverarbeitungssection dar -> "Steuerklasse"

Code:

FehlerVerarbeitung stellt wie der Name die Handleclass für die Fehlerverarbeitung des kompletten Macro dar.

Was macht das komplette Makro?
Das vba ließt einzelne cells aus den mappen und verarbeitet/formatiert sie.
Ist man damit fertig, werden die ausgelesenen Werte in eine Textdatei gestellt.
Da bei der Verarbeitung viele Fehler auftreten können, muss man hier besonders beim "Schreiben in txt-datei" auf eine FehlerVerarbeitung setzen.

Tritt nun ein Fehler auf, will ich das VBA beenden (kontrolliert und mit spez. Fehlermeldung). Das Speichern will ich im Fehlerfall nicht durchführen.

Am besten erkläre ich es nochmals an einem Beispiel

Der Benutzer speichert die Exceldatei.

Durch workbook_beforesave wird meine Mainsec aufgerufen.
Die Verarbeitung ist nun angestoßen.
Da die TXTdatei gerade von einer anderen Anwendung benutzt wird, kann nicht in die TXT-Datei gespeichert werden.
Es wird mit entsprechender Info in die Fehlerverarbeitung gesprungen.

code nur zum Beispiel
Code:

In der Fehlerverarbeitung wird nun eine MSGBox ausgegeben und das VBA beendet(end)

Leider speichert Excel trotzdem das Excelfile ab.



Ist es nun klarer?

 

Moin, RADS,

wo wird dann Cancel auf TRUE gesetzt?

 

Moin Moin,

ich habe gerade weiterprobiert und die Frage hat mich auf eine Idee gebracht.

ich hatte früher immer das cancel direkt per zweiten Aufruf auf true zu setzen.

so in etwa

workbooks_beforesave(false,true)

hat aber natürlich zu einer "endlosschleife" geführt

Nun setzt ich im Abbruchfall einen Schalter(boolean) um und frage wie folgend ab
Code:

ich test das jetzt noch etwas genauer durch, ob das auch wirklich stimmt, dann geb ich am besten nochmals bescheid?