Private Sub Pozicija_AfterUpdate() Me.Broj_op.RowSource = Me.Broj_op.RowSource End Sub