Office: (Office 2007) Laufzeitfehler 2427

Hallo & guten morgen zusammen,

der unten stehende Code zeigt mir beim Buttondrücken den im Unterformular ausgewählten Datensatz in einem separaten Formular an.
Wenn das Formular neu geöffnet wird, ist das Unterformula optisch leer. In diesem Fall erscheint die Fehlermeldung "Laufzeitfehler 2427 - Sie haben einen Ausdruck ohne Wert eingegeben"

In diesem Fall soll eine MessageBox angezeigt werden die besagt, dass man erst ein Filterkriterium in eines der im Hauptformular befindlichen Textfelder eingeben soll. Wie stelle ich das an ?


Code:

:)

 

Hallo!

Für eine Hilfestellung bei einer Fehlermeldung ist es hilfreich, wenn du die Zeile beschreibst, in der der Fehler auftritt.
Am einfachsten findest du das, wenn du in den VBA-Optionen auf "Anhalten bei jedem Fehler" umstellst. Dann musst du bei der Fehlermeldung nur noch auf Debugen klicken und die Fehlerhafte Zeile wird markiert.

Meine Vermutung:
Me!ufrmStammdatenSuchen.Form.ID ist Null.

=> das kannst du prüfen und entsprechend darauf reagieren.
Code:

mfg
Josef

 

Hallo Josef,

der Code bleibt im VBA-Modus in der folgenden Zeile "hängen":

Code:

 

Ich bin leider KEIN VBA-Spezi *rolleyes.gif*
Folgender Code funktioniert leider nicht, weil ich diesen sicherlich total falsch formuliert habe. Kannst Du ihn bitte für mich sortieren?

Code:

 

Ich helfe dir beim Korrigieren, damit du VBA lernst.
Access-Entwicklung ohne VBA ist langweilig. *wink.gif*

Ein If-Anweisung hat folgenden Aufbau

Code:

Falls du z. B. eine Prozedur abbrechen willst, kannst du das mit exits sub oder exit function umsetzen.

z.B.:
Code:

mfg
Josef

 

Ich beziehe mich auf den ursprünglichen Code.
Code:

Wenn das Formular nur bedingt geöffnet wird und nicht in jedem Fall, egal, was Suchen_Click macht, könnte es schon besser laufen.
Eigentlich sollte man aber auch prüfen, ob es in dem Unterformular Datensätze gibt, eine vorhandene Datenherkunft kann auch ein leeres Recordset liefern.
Und dann könnte noch im aktuellen Datensatz die ID NULL als Inhalt haben ...

 

Hallo,
Else ist ja Bestandteil von If Then Else. Das End If kommt dann natürlich zum Schluss.
Code:

Wenn man Einrückungen etwas gestaltet, fällt so etwas auch leichter auf.

 

Vielen Dank für Eure Beispiele ... ABER irgendwie passiert gar nichts beim Buttondrücken ODER es kommt wieder dieser Laufzeitfehler 2427. *frown.gif*

Wer möchte kann sich hier mal das betreffende Formular in meiner DB ansehen: Download-Link

 

hab ich ganz vergessen ... es handelt sich um den "roten Button" (Detail-Datensatz im Formular anzeigen) im Formular "frm_Stammdaten_suchen"

 

[falschen Thread erwischt]

 

Hallo Josef, dieser Code stammt NICHT aus meiner Datenbank. *boah

 

Hallo!

Sorry, das war ein Code aus einem anderen Thread.
(Deinen Link konnte ich nicht öffnen.)

mfg
Josef

 

Sorry, hatte einen Schreibfehler drin. Hier nun der richtige: neuer Downloadlink

 

Hallo!

Ich erahne das Problem. *wink.gif*

Code:

Was erwartest du eigentlich von der Zeile
Code:

Kann es sein, dass du damit prüfen willst, ob im Unterformule Datensätze angezeigt werden?

Probiere einmal diese Code und überlege, ob die If-Prüfung passt.
Code:

Vorschlag zur Benutzersteuerung:
Was wäre, wenn der Button "Anzeigen" so lange inaktiv wäre, bis im Unterformular Datensätze angezeigt werden?
Dann kann der Anwender diesen Button gar nicht klicken und er muss zuerst die Suche starten.
Auch sehr praktisch: ein Doppelklick im Unterformular bei einem bestimmten Datensatz öffnet diue Detailmaske.

mfg
Josef

 

Danke für den Code ABER nach dem Buttondrücken passiert wieder NICHTS *frown.gif*

Es soll eine MessageBox angezeigt werden die besagt, dass ERST ein Datensatz im Unterformular angezeigt sein muss. Erst wenn also ein Datsatz angezeigt wird, soll dieser im entsprechenden Formular angezeigt werden.

PS: Der Code ist nicht auf meinem Mist gewachsen, hatte ihn aus einer anderen DB als Vorlage übernommen.