Office: (Office 2000) Form nach Fokusverlust schließen

Hallo zusammen,

ich habe ein Formular x in dem es ein kleines Bild gibt. Wenn der User drauf klickt öffnet sich ein Formular mit dem Bild in einer größeren Version. Da die User zu faul sind solche Fenster zu schließen würde ich dies gerne per VBA selber tun, wenn der User im Hauptfenster weiterabeitet.

Ich wollte folgenden Code bei Fokusverlust des Formulars hinterlegen:
Code:

Dann gibt es den Fehler: Die Aktion kann nicht ausgeführt werden, solnage ein Formular- oder Berichtereignis verarbeitet wird.

Wie kann ich das Form am Besten schließen?

:)

 

versuche es mal so:

Code:

bei deiner Methode weiss VBA u.U. nicht, was es schließen soll

 

Habe ich probiert. Gehlt leider auch nicht.
Es muss doch möglich sein, ein Formular bei Fokusverlust zu schließen oder verlange ich zuviel?

 

weiss nicht, hab es noch nicht probiert.

hast du geprüft ob das ereignis LOSTFOCUS auch tatsächlich eintritt?

 

Ja, es tritt ein...habe ich probiert. Habe einen Haltepunkt im VBA-Fenster in de Zeile gesetzt. Beim Fokusverlust springt er dort rein und zeigt mir den Fehler an.

Wenn es keine Möglichkeit gibt, werde ich das Formular sooooogroß machen, dass der User gezwungen ist, es zu schließen *Smilie ...habe aber auf eine komfortablere Lösung gehofft...

 

Hallo Smmabart,
also, wenn ich richtig verstehe, soll nach Klicken auf das Bild im ersten Formular das andere Formular mit dem größeren Bild geöffnet werden und das aktuelle (kleines Bild) geschlossen werden, oder?

Dann schreib doch den ganzen Code in das Click-Ereignis:

Code:

Gruß,
Jan

 

Hallo Jan,

nicht ganz. Das Hauptfenster "x" beinhaltet ein kleines Bild. Wenn man drauf klickt öffnet sich ein neues Formular "y" im Vordergrund, das Hauptfenster "x" bleibt geöffnet.
Wenn der User dann das Hauptfenster "x" wieder anklickt , verliert "y" den Fokus und soll geschlossen werden.

 

ich denke die fehlermeldung hat folgenden grund

LOSTFOCUS ist ein ereignis das zu ende ausgeführt werden muss. innerhalb des ereignisses versuchst du aber, das form mit dem befehl DoCmd.Close zu schließen, darum kann das ereignis nicht abgeschlossen werden.

vllt baust du die fehlernummer in deine fehlerbehandlung ein und gehts danachmit ResumeNext weiter. ob das funzt weis sich nciht undist auch nur eine notlösung.

du könntest auch probieren, bei Ereignis 'Fokuserhalt' des Hauptforms, in dem der anwender weiterarbeitet, das Bildform zu schließen

 

Und warum öffnest Du das Formular mit dem großen Bild nicht als Dialog??

Gruß

LL

 

Hi LL,

das kannte ich bis jetzt ja noch gar nicht *Smilie
Schöne Sache. Habe ich mal eingestellt, somit ist der User gezwungen erstmal das Fenster zu schließen ehe er weiter machen kann.

Danke

 

\@Smmabart; @Louisleon,

Ah, ok, jetzt verstehe ich! Die Variante mit dem Dialogfeld ist natürlich eleganter.
Wenn Du das nicht möchtest, setzte das Schließen von Formular "y" (laut Beitrag #7) in das Formular "x" beim Ereignis "Fokus-Erhalt". Sofern keine weiteren Fenster aktiv sind, brauchst Du nicht einmal eine Fehlerabfrage oder eine Abfrage, ob "y" geöffnet ist.

Gruß,
Jan

 

Hallo!
@Jan

Das halte ich für einen gefährlichen Tipp. In einer Umgebung wie Windows kannst Du nicht sicherstellen, dass das zu schließende Formular geöffnet ist, wenn das Hauptformular den Fokus bekommt. Man kann auch aus anderen Gründen und über andere Fenster wieder auf das Hauptformular gekommen sein.
Meiner Meinung nach sollte das ganze über Ereignisse gesteuert werden. Das ist am fehlertolerantesten. Wenn ein Ereignis ausgelöst wird, aber keinen Adressaten findet, stürzt jedenfalls die Anwendung nicht ab. Bei DonKarl findet sich ein Bericht von einer AEK, wo das am Beispiel eines Statusfensters vorgestellt wird. Josef P. hat glaube ich auch mal ein paar Sachen dazu geschrieben. Ich selbst habe das erst ein- oder zweimal nach diesen Mustern implementiert und kann, da ich gerade keinen Zugriff auf meine Access-Anwendungen habe nicht mit einem Beispiel dienen.

Gruß
Vincenz

 

\@vfrei

Deshalb schrieb ich ja auch "Sofern keine weiteren Fenster aktiv sind, brauchst Du nicht einmal eine Fehlerabfrage oder eine Abfrage, ob "y" geöffnet ist."

Gruß,
Jan

 

Eine Möglichkeit wäre auch noch in der Ereignisbehandlung zum Fokusverlust einen Timer zu starten und über diesen Timer das Formular zu schließen. Bis der Timer anläuft reicht dann vielleicht auch das Ausblenden des Formulars aus.

Aber anders gefragt: was machst du, wenn ich als Benutzer das Formular offen lassen will und trotzdem kurz in ein anderes Formular wechseln will, um andere Daten zu lesen?
Dann wäre ich nicht besonders begeistert, wenn jedes Mal das Bild geschlossen wird.
=> Alternative: Falls das Bild-Formular zum Formular mit dem kleinen Bild gehört - also ohne dieses nicht offen sein soll, könnte man das Bild-Formular auch als Form-Instanz (per New) öffnen und die Referenz im aufrufenden Formular speichern. Dann wird das Bild-Formular automatisch geschlossen, wenn das aufrufende Formular geschlossen wird. (Man muss dann nicht prüfen, ob möglicherweise das Bildformular geöffnet ist und es dann per Code mit Docmd.Close schließen.)

 

Ich würde sagen:
"Mach es Dir selbst!" *biggrin.gif*

Wenn's ein anderer sagt:
"Steht so leider nicht im Blueprint, bitte eröffnen Sie einen ChangeRequest!" *wink.gif*

Gruß

LL