ich bin ein absoluter Autodidaktiker und habe alles Wissen in Access mir durch Copy, Paste und ausprobieren angeeignet. Jetzt komme ich aber irgendwie nicht weiter.
Ich habe drei Kombinationsfelder, von denen eines grün, eines gelb und eines rot hinterlegt ist. Der Inhalt ist der gleiche. Jetzt will ich in Abhängigkeit von zwei Ja/Nein Feldern immer nur eines dieser drei Felder anzeigen.
Fall 1: j/n „Freigabe erfolgt“ = JA: grün
Fall 2: j/n "Freigabe erfolgt = NEIN und „Freigabe abgelehnt“ = JA: rot
Fall 3: "Freigabe erfolgt = NEIN und „Freigabe abgelehnt“ = NEIN: gelb
drei Kombinationsfelder… Der Inhalt ist der gleiche
dann bietet sich an, dafür 1 Kombinationsfeld zu nehmen und den Hintergrund entpsprechend einzufärben.
Mein Vorschlag (getestet):
Private Sub FA_Change()
Call Set_Backcolor_K
End Sub
Private Sub FE_Change()
Call Set_Backcolor_K
End Sub
Private Sub Set_Backcolor_K()
Dim rot As Long ' #ED1C24
Dim grün As Long ' #22B14C
Dim gelb As Long ' #fff200
rot = RGB(255, 0, 0)
grün = RGB(0, 255, 0)
gelb = RGB(255, 255, 0)
Select Case (FE & FA)
Case "JN", "JJ"
K.BackColor = grün
Case "NN"
K.BackColor = rot
Case "NJ"
K.BackColor = gelb
Case Else
End Select
Me.Refresh
End Sub
ok, danke schon einmal. ich habe die Anführungszeichen bei „true“ entfernt, hilft aber nichts. Ich lasse mir das ja/nein-Kästchen auch anzeigen und weiß daher - eigentlich - welchen Wert ich vor mir habe. Es sieht nun so aus (und funktioniert immer noch nicht):
Else
If Me.FreigabeMDabgelehnt = True Then
Me.Kombinationsfeld160.Visible = False
Me.Kombinationsfeld282.Visible = False
Me.Kombinationsfeld283.Visible = True 'rot
Else
Me.Kombinationsfeld160.Visible = True 'gelb
Me.Kombinationsfeld282.Visible = False
Me.Kombinationsfeld283.Visible = False
End If
End If
… dass er immer auf die letzte Bedingung (gelb) durchrutscht, heißt für mich, dass er die obigen Bedingungen nicht als wahr anerkennt, auch wenn ein Häckchen gesetzt ist. Muß ich die Bedingung mit = 0 bzw. -1 ansprechen?