Laufzeitfehler '2448': Sie können diesem Objekt keinen Wert zuweisen - VBA/Access - Optionsgruppe

Question

Ich verwende eine Optionsgruppe für einen Schüler, um das Programm auszuwählen, das sie studieren. Nach der Auswahl eines Textfelds mit dem Namen ProgrammeChoiceT wird der Wert auf die Programm-ID gesetzt, wobei eine Steuerquelle auf die Programm-ID gesetzt wird.

Dies ist alles getan, damit die ProgrammeID nicht als Standard-Optionsgruppe Werte von 1-3 gespeichert werden kann. Allerdings ist es nicht funktioniert und dieser Fehler wird angezeigt:

Laufzeitfehler ‚2448‘: Sie können keinen Wert auf dieses Objekt

zuweisen Wenn ich die Steuerquelle zu entfernen, die ProgrammeChoiceT.Value von das Textfeld ändert sich zu "AM", nur wenn die Steuerquelle eingestellt ist, erscheint der Fehler.

Wie behebe ich das?

-Code ist unten dargestellt:

Private Sub ProgrammeF_AfterUpdate() 

Select Case ProgrammeF.Value 
    Case 1 
    ProgrammeChoiceT.Value = "AM" 
    Case 2 
    ProgrammeChoiceT.Value = "FM" 
    Case 3 
    ProgrammeChoiceT.Value = "HRM" 
End Select 
End Sub 

Answer 1

Ich glaube, der Fehler ist, dass Sie den Wert und das Feld nicht ausgewählt haben.

daher ist die Lösung:

Select Case ProgrammeF 
case 1 
    programmeChoiceT.value ="AM" 

Alternativ, wenn Sie den Wert auswählen wollen, dann und if...then Anweisung verwenden.

Answer 2

Enthält das Feld, in dem Sie den Wert speichern, eine Dropdown-Liste mit mehreren Spalten? Ich frage mich, ob der Fehler, den Sie erhalten haben, darauf zurückzuführen ist, dass die Optionen im Dropdown-Feld nicht mehrere Spalten enthalten. Die numerische Option wäre die gebundene Spalte und die Werte für diese Optionen wären eine zweite Spalte. Sie können die Spaltenbreiten so ändern, dass nur die Textwerte angezeigt werden, aber die numerischen Werte werden gespeichert.