Private Sub Combobox2_AfterUpdate()
Forms![Combobox1]![Subform Underformulär].Form![Combobox2_ID] = Me.Combobox2
End Su