September 24, 2020, 04:32:24

Neuigkeiten:

Wenn ihr euch für eine gute Antwort bedanken möchtet, im entsprechenden Posting einfach den Knopf "sag Danke" drücken!


Unterformular auf vorhandensein eines DS prüfen

Begonnen von mbdi, August 20, 2020, 09:31:34

⏪ vorheriges - nächstes ⏩

mbdi

Moin moin,

ich stehe gerade auf dem Schlauch

Ich habe ein Formular "ufrm_Protokoll" und ein Formular "ufrm_Protokoll_Beschreibung"

Verknüft sind sie über Protokoll_ID und Protokoll_ID_Beschreibung

Wenn ich das Form ufrm_Protokoll aufrufe, möchte ich gerne prüfen, ob im ufrm_Protokoll_Beschreibung ein Eintrag vorhanden ist.

Wenn das so ist, möchte ich im ufrm_Protokoll folgendes :

If DS im ufrm_Protokoll_Beschreibung mit gleicher ID vorhanden..... Then
Rechteck28.BackColor = RGB(237, 28, 36)
Else
Rechteck28.BackColor = RGB(217, 236, 255)
End If

Ich möchte damit visuell anzeigen, das es noch weitere Daten gibt.
Das Form ufrm_Protokoll_Beschreibung kann man dann per Button öffnen.

Hoffe ich habe das einigermaßen verständlich ausgedrückt :-D

DF6GL

Hallo,


im Unterform:

Private Sub Form_Current()


If Me.Recordset.RecordCount > 0 Then
Me.Parent!Rechteck28.BackColor = RGB(237, 28, 36)
Else
Me.Parent!Rechteck28.BackColor = RGB(217, 236, 255)
End If

End Sub