Hallo Leute!
Ich hoffe ihr könnt mir helfen. Ich kenne mich mit Access leider noch nicht so sehr aus.
Ich habe ein Listenfeld, indem ich einen Wert auswählen kann, welcher dann per Button gedruckt wird. Ich bekomme meine Daten auch in den Bericht. Nur hier kommt mein Problem:
Es gibt einen Wert (Aufgetaut Ja/ Nein) den ich nicht im Bericht habe sondern stattdessen nur ein E oder ein A haben möchte. Dies wollte ich mit visible= true/false machen. Also mit If und ELSE (Wenn aufgetaut dann A sichtbar sonst E sichtbar) Nur leider weiß ich nicht wie ich das Listenfeld in die Funktion einbauen muss.
Ich hoffe mir kann jemand helfen
Hier der Code für meine Variante als ich noch kein Listenfeld hatte
Private Sub Report_Open(Cancel As Integer)
Dim aufgetaut As Boolean
aufgetaut = DLookup("[aufgetaut]", „[tbl_abschnitte]“, "[beleg_id] = " & Form_tbl_abschnitte.[beleg_id])
If (aufgetaut = False) Then
Me.auftaudatum.Visible = False
Me.auftaudatum_bez.Visible = False
Me.einfrierdatum.Visible = True
Me.einfrierdatum_bez.Visible = True
Me.tf_aufgetaut_a.Visible = False
Me.tf_aufgetaut_e.Visible = True
Else
Me.auftaudatum.Visible = True
Me.auftaudatum_bez.Visible = True
Me.einfrierdatum.Visible = False
Me.einfrierdatum_bez.Visible = False
Me.tf_aufgetaut_a.Visible = True
Me.tf_aufgetaut_e.Visible = False
End If
End Sub
Gruß