Hallo zusammen,
Ich wähle in einem Kombinationsfeld drei Typen aus. Typ1, Typ2 oder Sonder. Für den Typ1 und 2 müssen keine Preise hinterlegt werden, da sie universell sind. Lediglich beim Typ Sonder muss in einem Textfeld ein Sonderpreis eingetragen werden. Wie kann ich es bewerkstelligen, dass bei der Auswahl von Typ1 oder 2 das Textfeld inaktiv bzw. nicht ansteuerbar ist und bei Typ Sonder der Nutzer einen von ihn individuell gewählten Preis eintragen kann?
Ich hoffe ich habe mich umständlich ausverdrückt ;D.
Grüße
Der Paulemeister
Hallo,
etwa nach diesem Schema:
Sub cmbTypen_Afterupdate()
Select Case Me!cmbTypen
Case "Typ1", "Typ2"
Me!Sonderpreis.Enabled=False
Me!Sonderpreis.Locked =True
Case "Sonder"
Me!Sonderpreis.Enabled=True
Me!Sonderpreis.Locked =False
Me!Sonderpreis.Setfocus
Case Else
Me!Sonderpreis.Visible =False
End Select
End Sub
Evtl. ist weiterhin erforderlich:
Sub Form_Current()
cmbTypen_Afterupdate
End Sub
Danke,
Hat funktionukkelt