Office: (Office 2003) Globale Funktion

Hallo,
einige Formulare sollen nur in Verbindung mit anderen Formularen zu öffnen sein.
Damit ich nicht ständig den gleichen Test schreiben muss wollte ich dies Gobal definieren.

Code:

Im FormOpen Ereignis sollte dann nur noch stehen:

fktFormOpen
stDocName = "Name des übergeordneten Formulars"
stFormName = "Name des Formulars, welches geöffnet werden sollte"

Leider funktioniert das so nicht wirklich, ich erhalte hier Fehlermeldungen, hier z.B. Variable nicht definiert (stDocName) bzw. werden die beiden Formularnamen (stDocName und stFormName) nicht mit angezeigt.

Wo habe ich hier den Fehler gemacht?

:)

 

Der Gang der Dinge sollte so sein:
Code:

Die Variablen in den Klammern werden der Funktion übergeben, z.B. aus dem aufrufenden Formular.
Aufruf im Formular beispielsweise:
Code:

oder auch nur
Code:

maike

 

Wo übergibst du die Werte in die Prozedur?

Code:

Nutzung:
Code:

BTW: Wozu dient die Variable Response? DoCmd.Close kommt mir auch etwas eigenartig vor.


mfg
Josef

 

Zu #3
so funktioniert es.

Warum ich Response? DoCmd.Close d'rin hatte kann ich jetzt gar nicht mehr sagen.

Mit Me.Name wird mir leider der Access Formularname angezeigt. Mit diesem kann der Benutzer aber nichts anfangen. Daher sollen hier die Benutzernamen, in diesem Fall "Personalübersicht" angezeigt werden.

In der Zwischenzeit war ich schon ein klein bisschen weiter und habe den Code dahin erweitert, das der Benutzer die Wahl hat, das übergeordnete Formular gleich zu starten.

Daher ist nun
stDocName = "Name des übergeordneten Formulars" =>Accessname = z.B. frmPersVerz
stFormName = "Name des Formulars, welches geöffnet werden sollte"
stHauptFormName = "Name des übergeordneten Formulars" => Benutzername = z.B. Personalvereichnis

Im FormOpen Ereignis des Formulars "Personalübersicht" sieht das so aus:
Code:

Das wollte ich nun gerne Global so definieren, das ich dies mit ein paar kurzen Zeilen, wie unter #3, für mehrere Formulare verwenden kann.

 

Es stellt sich mir die Frage, ob es nicht einfachere Wege gibt...

Formularöffnungen werden doch irgendwie angestoßen:

• per Makro
• per VBA
• per Menübefehl

Diese Dinge lassen sich doch steuern: Ein Makro wird nicht ausgeführt, ein VBA-Befehl nicht aufgerufen, ein Menüeintrag ausgeblendet oder inaktiv, ein Button desgleichen. Dazu bedarf es dann auch keiner MsgBox, weil es eben nicht geht. *wink.gif*

 

Warum? *confused.gif*
Im Klassenmodul funktionierts doch. Warum soll es denn nicht auch Global funktionieren?
Und warum soll nicht der Benutzer, wenn er Auf einen Umstand hingewiesen wird, in diesem Fall, das sich das gewünschte Formular nur über ein anderes öffnen lässt, nicht auch die Möglichkeit erhalten, gleich mit einem Klick ebend dieses Formular zu öffnen?

Im Prinzip funktioniert doch der Vorschlag von Josef. Ich möchte ihn doch jetzt nur etwas erweitern und anpassen, Benutzerfreundlich gestallten.

Gru?
Christoph

 

\@Christoph

Genau das würde ich im Hintergrund steuern ohne den User einzubeziehen.

Aber das ist wohl Geschmackssache. *wink.gif*

 

\@Maxel
... aber wie?
Vorschlag, ich sage ja nicht, das meine Lösung DIE ist.

Ich möchte ja nur Vorsorge treffen, falls der Benutzer, was eigentlich nicht sein soll, ein Nebenformular öffnet, welches nur aus einem dazugehörigen Hauptformular geöffnet werden soll.

Anfangs hatte ich die Möglichkeit mit drin, das dann das Hauptformular dann automatisch öffnet. Wegen des komplexen Cod's mit dem ich so nicht klargekommen bin, habe ich das wiederum verworfen.

Gruß
Chistoph

 

Das "Wie" könntest du aus Beitrag #3 ableiten. Probiere eine Variante aus und falls damit Fehler entstehen, zeigst du den Code her. (Ich bin zumindest der Meinung, dass es nichts bringt, wenn dir hier der Code vorgekaut wird. Weichkochen und Kleinschneiden mache ich gerne, aber kauen musst du selbst. *biggrin.gif*)

Wie kann der Anwender das Nebenformular öffnen, wenn man es nur aus dem dazugehörigen Startformular öffnen kann?

mfg
Josef

 

\@Josef

Ich habe den Verdacht, dass das Datenbankfenster sichtbar ist...

 

Hallo,
so, ich glaub' ich habs geschaft! *Smilie
Jedenfalls sieht mein Ergebnis so aus, wie ich es wollte und es scheit sogar zu funktionieren.
Die Prozedur lautet:
Code:

Die Variablen sind unter Code:

deklariert

Die übergabe der Werte in die Prozedur erfolgt im Klassenmodul.
Code:

Das funktionierende Ergebnis habe ich Anhang noch mal angefügt.
@ Maxel
Das Datenbankfenster wird normalerweise nicht angezeigt. Aber wir haben auch Freaks, die sie über die Menü- Symbolleisten dann die Formulare holen.

Gruß
Christoph

 

Warum hast du die Variablen für die Funktionsparameter als Public deklariert?

Es würde doch auch so etwas funktionieren:
Code:

Noch etwas:
Code:

Da du die Parameter den identischen Namen wie den globalen Variablen gegeben hast musst du beachten, wann welche Variable zum Einsatz kommt.

Ich kann dir nur empfehlen, wo immer es geht auf globale Variablen zu verzichten. Du öffnest damit nur viele Fehlerquellen, die schwer zu finden sind.
Sobald eine Anwendung etwas komplexer wird, kann es passieren, dass eine Variable ungewollt mit einem neuen Wert versorgt wird, obwohl der alte Wert noch benötigt worden wäre. Da die Änderung in einer globalen Variable aber nicht kontrolliert werden kann, arbeitet der Code - den den alten Wert benötigt hätte - mit dem neuen Wert weiter, als wäre alles ok.

Außerdem finde ich Code mit vielen globalen Variablen schwer zu lesen, da man nur schwer herausfinden kann, wann welche Variable eingestellt wird. => Das erhöht die Gefahr, dass man bei Änderungen im Code etwas übersieht und Fehler produziert.

mfg
Josef

 

Hallo Josef,
stimmt, so funktioniert das nun auch.
Ich hatte es erst auch so, aber da funktionierte es nicht, hab mir da wohl 'nen Fehler eingebaut.

Danke dann noch für den Hinweis.

Eigentlich wollte ich einiges auf globale Variablen, bzw. Prozeduren umstellen, da ich in vielen Formularen immer den gleichen Codetest verwende. Wenn dann Änderungen eintreten muss ich immer wieder alle Formmulare durchschauen und den Code anpassen. Hier, so hatte ich gedacht muss ich dies dann nur an einer Stelle tun.

Gruß
Christoph

 

Aufgaben in Prozeduren auslagern ist durchaus sinnvoll - das kann ich nur empfehlen. Globale Variablen benötigt man aber eigentlich nur sehr selten.

Sobald du in Prozeduren auf globale Variablen zugreifst, hast du aus Sicht der Prozedur nicht mehr die volle Kontrolle über den Variableninhalt.
Normalerweise sollte man bei Prozeduren mit den Parametern und bei Bedarf mit dem Rückgabewert auskommen.
Alles was die Prozedur benötigt, fordert sie durch die Parameter ein.
Damit ist eine klare Schnittstelle gegeben und man muss bei der Verwendung einer Prozedur nicht wissen, was sonst noch alles zuvor eingestellt werden muss.

mfg
Josef

 

... wie ist denn das, wenn ich einen Wert aus einer Formular für ein anderes benötige.
Bsp = xBenutzer aus dem LogIn Formular

im Formular Geräte um hier bestimmte Daten ein zu geben bzw zu verändern, die der Normale Benutzer nicht ändern soll?

Christoph