Formulafeld einfärben

[boehnli01]

Hallo zusammen - bin wieder mal am Ende meiner Kenntnisse für ein wahrscheinlich ganz simples Ereigniss.

Mit diese code erhalte ich immer eine error msg "Run Time error 424" "Object required"

Code (vb) [Auswählen] Erweitern

Private Sub Form_Current()
If Me.Scheduler = True And Me.PROCESSORDER Is Null Then
Me.PROCESSORDER.BackColor = 6447871
Else
Me.PROCESSORDER.BackColor = vbWhite
End If
End Sub

Kann mir da jemand helfen bitte. Danke Cédric

[MzKlMu]

Hallo,
die Prüfung auf Null ist eine Funktion.

Code [Auswählen] Erweitern

Private Sub Form_Current()
If Me.Scheduler = True And IsNull(Me.PROCESSORDER) Then
 Me.PROCESSORDER.BackColor = 6447871
Else
 Me.PROCESSORDER.BackColor = vbWhite
End If
End Sub

Anmerkung:
In einem Endlosformular funktioniert das aber grundsätzlich nicht.

[boehnli01]

Vielen dank. Hat funktioniert