Do you need to populate uurloon field with value from funtie combobox?
Reference the combobox columns by their index. Index begins with 0.
Sub funtie_AfterUpdate()
Me.uurloon = Me.funtie.Column(IIf(Me.Parent.type = "Regulier", 2, 3))
End Sub
I don't see need to programmatically change the funtie combobox RowSource.