Ciao,
naturalmente non potete regolare un campo ad un valore se già contiene una formula per il calcolo. In questo caso deve essere un campo vuoto e non legato. E poichè questo non è un campo conservato potete utilizzare il codice qui sopra nell'evento attuale della forma che si presenta su tutto il cambiamento record nella forma principale.
Inoltre, questo codice non funzionerà se non avete almeno tre annotazioni nel vostro subform.
1. rimuovere
= [subform del qryRandomSalesPersonNext]. Forma! EmpID
dal txtRandom
2. copiare questo codice nella vostra forma principale:
Form_Current secondario riservato ()
Rs fiochi come DAO.Recordset
Regolare i rs = me. [subform del qryRandomSalesPersonNext]. Form.RecordsetClone
rs.MoveFirst
Se Me.txt casuale = Me.FIRSTOwner allora
rs.MoveNext
Se Me.txt casuale = Me.SECONDOwner allora
rs.MoveNext
Concluder se
Concluder se
Se non (rs.EOF o rs.BOF) allora
Me.txt casuale = rs. Campi (“EmpID„)
Concluder se
Regolare i rs = niente
Concludere il sommergibile
allora dovrebbe funzionare.
Acclamazioni,
Cristiano