Formular soll sich nicht öffnen wenn keine Datensätze im UFO vorhanden sind

[Optiplex]

Hallo zusammen,
die Probleme reisen nicht ab!

Ich habe ein Formular in diesem Formular ist ein gefiltertes Unterformular. Nun kann es vorkommen dass dieses Unterformular keine datensätze besitzt. Ich möchte nun, dass das Hauptformular sich erst gar nicht öffnet sonder eine Meldung erscheint, wenn das UFO leer ist. Ich bekomme es einfach nicht hin die Anzahl der Datensätze im Ufo abzufragen während sich das HFO öffnet.

Hat jemand einen Tip für mich?

Gruß Dieter

[oma]

Hallo Dieter,

in einem Haupt/Unterformular sind ja normalerweise die Datensätze des UF mit Datensätze im HF verbunden.
So kann man ja nicht generell sagen, ob dass UF leer ist, da das ja von DS zu DS des HF verschieden sein kann!

Gruß  Oma

[Optiplex]

Hallo Oma,
das HF ist ungebunden,das hätte ich natürlich gleich dazuschreiben sollen.

Gruß Dieter

[oma]

Hallo, Dieter,

etwas so:

Code [Auswählen] Erweitern

Private Sub FormularOeffnen_Click()
    If dcount ("*", "TabelleUnterformular") = 0 Then
        msgbox  "nix da!"
    Else
        docmd.OpenForm formName:="DeinFormular"
    end If
End Sub

Gruß Oma

[Optiplex]

Hallo Oma,

genau so gehts, danke für die schnelle Lösung. An diese Domwerte denke ich nie!

Gruß Dieter