Discussion:
Formular "unsichtbar" und "sichtbar machen
(zu alt für eine Antwort)
Frank Kötting
2006-11-23 10:04:52 UTC
Permalink
Hallo Access_freunde,

ich habe folgendes Problem.

Ich habe ein Formular das ich während der Eingabe von Daten in einem zweiten
Formular unsichtbar machen möchte.

Forms![frm_Formular].Visible = False


Das klappt auch.

Nach der Eingabe von Daten in dem zweiten Formular soll das erste Formular
wieder sichtbar werden.

Forms![frm_Formular].Visible = True
DoCmd.Close acForm, "frm_Lieferanten_Artikel"

Leider tut es dieses aber nicht. Es ist weiterhin aktiv, bleibt aber
unsichtbar.
Keine Ahnung warum.

Vielen Dank für Eure Hilfe.

Frank Kötting
Thomas Möller
2006-11-23 10:20:53 UTC
Permalink
Hallo Frank,
Post by Frank Kötting
Ich habe ein Formular das ich während der Eingabe von Daten in einem
zweiten Formular unsichtbar machen möchte.
Forms![frm_Formular].Visible = False
Das klappt auch.
Nach der Eingabe von Daten in dem zweiten Formular soll das erste
Formular wieder sichtbar werden.
Forms![frm_Formular].Visible = True
DoCmd.Close acForm, "frm_Lieferanten_Artikel"
Leider tut es dieses aber nicht. Es ist weiterhin aktiv, bleibt aber
unsichtbar.
in welchen Ereignissen hast Du diesen Code stehen?

Was meinst Du genau mit: "Es ist weiterhin aktiv, bleibt aber
unsichtbar." ?


CU
--
Thomas

Homepage: www.Team-Moeller.de
Ulrich Haarmeyer
2006-11-23 12:16:34 UTC
Permalink
Hallo Frank.

"Frank Kötting" schrieb
Post by Frank Kötting
Hallo Access_freunde,
ich habe folgendes Problem.
Ich habe ein Formular das ich während der Eingabe von Daten in einem
zweiten Formular unsichtbar machen möchte.
Forms![frm_Formular].Visible = False
Das klappt auch.
Nach der Eingabe von Daten in dem zweiten Formular soll das erste Formular
wieder sichtbar werden.
Forms![frm_Formular].Visible = True
DoCmd.Close acForm, "frm_Lieferanten_Artikel"
Leider tut es dieses aber nicht. Es ist weiterhin aktiv, bleibt aber
unsichtbar.
Keine Ahnung warum.
Ich verwende dafür meist das OpenArg des Formulars (überVBA)
Also im VBA-Code zum Öffnen von Formular2 als letztes
Aargument eingeben:
, Me.Name (Bei einem UF: , Me.Parent.Name)

in Formular2 im Ereignis beim Öffnen:
If Me.OpenArgs>"" then Forms(Me.OpenArgs).Visible = False

im Ereignis beim Schließen
If Me.OpenArgs>"" then Forms(Me.OpenArgs).Visible = True

Somit kannst du Formular2 aus jedem beliebigen Formular öffnen,
ohne den Code verändern zu müssen. Nur eben beim Öffnen
den Formularname mit üergeben.

Gruß
Uli

Loading...