Office: Problem mit VBA-Codes / Pflichtfelder ausfüllen, dann erst Möglichkeit zum Speichern

Hallo zusammen,

ich benötige mal die Hilfe von Spezialisten.

Ich stehe vor folgendem Problem (am Beispiel der angehängten Datei):

1.) Ein Speichern der Vorlage soll erst dann möglich sein, wenn folgende Zellen irgendwelche Daten enthalten (J5, G7, E9, G11, O11, H13).

Ich war im Forum auch schon fündig geworden. Allerdings geht es bei dem Code ja nur ums "Schließen". Da ich blutiger VBA-Anfänger bin, weiß ich leider nicht, wie dieser auf "Speichern" umgeschrieben werden könnte.

Code:

2.) Das gleiche soll auch mit den Kontrollkästchen sein. D.h. mindestens ein Kästchen, pro eingerahmten Kasten, muss ausgewählt sein, bevor das Dokument gespeichert werden kann.

3.) Der dritte und letzte Wunsch ist, dass eine Messagebox erscheint, mit dem Hinweis auf die Pflichtfelder, wenn jemand bereits vorher versucht zu speichern.

Dazu hatte ich auch diesen Code gefunden:

Code:

Doch leider funktioniert der bei mir irgendwie nicht.

Ich hoffe es gibt da draussen jemanden, der mir helfen kann. *Smilie

Vielen Dank schonmal!

Mali *Sun

:)

 

Moin, Mali1406,

zu viele Fragen auf einmal... *wink.gif*

Zu 1.: Es gibt ein Ereignis BeforeSave in DieseArbeitsmappe:

Code:

Zu 2.: Arbeite mit verbundenen Zellen. Rechtsklick auf die Kontrollkästchen, Steuerelement formatieren, Reiter Steuerung. Bei Ausgabeverknüpfung kann deine Zelle aneggeben werden, in der der Wert erscheint (WAHR oder FALSCH). Und diese können über ZÄHLENWENN (VBA: CountIf) ausgezählt werden.

Zu 3.: Probier mal den Code aus 1. *wink.gif* Für Dich würde ich mit einer globalen Variablen, dem per Environ("Username") auszulesenden angemeldeten Nutzer am Betriebssystem oder in ein Feld gesetzten Wert arbeiten, sonst wirst Du die Mappe auch nicht ohne alle Werte speichern können...

 

Moin Jinx!

Erstmal herzlichen Dank für Deine Antwort.

Doch irgendwie bin ich zu doof dazu, oder aber meine Kenntnisse reichen tatsächlich noch nicht so weit.

Ich hab alles ausprobiert, doch irgendwie haut es nicht hin.

Könntest Du es mir vielleicht anhand der Datei mal vormachen???*happy

LG
Mali*Sun

 

Moin, Mali,

eine recht präszise beschreibung, was nicht klappt... *wink.gif*

Beide Prozeduren sind auskommentiert, in das Schließen habe ich den Ansatz für die Namensprüfung eingebaut für das Auslesen gibt es darunter ein Makro, was den Namen in den Drektbereich schreibt, falls Du ihn nicht wissen solltest *wink.gif*):
Code:

 

Moin Jinx,

ich sag ja, ich bin blutiger Anfänger. *Smilie

Ich werde mich dem ganzen mal annehmen und schauen, ob ich Deine Hilfe so umsetzen kann. Sobald sich etwas ergibt, melde ich mich.*cool.gif*

Danke nochmal! *Smilie

Mali *Sun