Questione : come convincere un campo per cambiare a caso.

Ciao EE
I ha una domanda che smusso il ritrovamento una risposta: il
I ha una forma di vendite che registra ogni condizione quando una persona di vendite tenta di fare una chiamata. Voglio la forma dopo che non ha registrato 12 “risposte„ per cambiare la persona di vendite che possiede quella punta di lead.

This è facile tuttavia lascia per dire la gente di vendite del hav 6 di i, se la persona 1 di vendite possiede un cavo e dopo che 12 atempts esso cambia il proprietario alla persona 2 di vendite questo funzionassero ma se ho 6 genti come convinco la persona 6 di vendite a andare a 1?
if ho usato appena una formula che era +1 che questa avrebbe funzionato per tutti ma il last

also sarebbe ancora migliore se potessi convincerlo per darlo a caso al seguente in modo da PER ESEMPIO la persona del
sales potesse passare a caso a chiunque etc


SO ecc: il
I già ha una domanda che conta la condizione in modo da la forma sa quando ottiene ai 12 number.#
How io convince la forma per cambiare il campo che contiene il nome di proprietario a chiunque a caso? i nomi della gente del

Sales sono mantenuti in un table.
class= del

Risposta : come convincere un campo per cambiare a caso.

Con soltanto altre 5 possibilità, sarebbe in qualche modo iffy ottenere un articolo vero casuale, ma potete fare l'uso il Rnd e ripartire le probabilità sulla funzione come indicato sotto “ad ordine„ una tabella provvisoria nell'ordine casuale. Ho avuto una tabella chiamata “tCustomers„ ed ho sviluppato una domanda per mostrare i miei nuovi dati a caso richiesti.

Vedere questo luogo, in cui ho copiato shamelessly le idee del centro per questo metodo: http://www.fontstuff.com/vba/vbatut02.htm

Si noti che ho aggiunto una domanda chiamata “qryRandomRecords„. Lo SQL per quella domanda è:

SELEZIONARE IL PRINCIPALE 25 tmpCustomers.sName, tmpCustomers.sStreet, tmpCustomers.RandomNumber
Dai tmpCustomers
ORDINE da tmpCustomers.RandomNumber;

Potreste usare questo per costruire una tabella del temp per i vostri commessi, quindi appena afferrate la prima annotazione restituita da quella domanda:

Rst fioco come DAO.Recordset
Regolare il rst = Currentdb.OpenRecords (“PRINCIPALE PRESCELTO 1 dai qryRandomRecords„)

Rst di Msgbox. Campi (0)

1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22:

Funzione GetRandomValues () Rst fioco come DAO.Recordset DoCmd.DeleteObject acTable, “tmpCustomers„ CurrentDb.Execute “sName PRESCELTO, sStreet nei tmpCustomers dai tCustomers„ CurrentDb.Execute “ALTERANO i tmpCustomers della TABELLA AGGIUNGONO IL DOPPIO RandomNumber della COLONNA„ Regolare il rst = CurrentDb.OpenRecordset (“SELEZIONARE * A PARTIRE dai tmpCustomers„) Fare fino a rst.EOF Ripartire le probabilità su rst. Pubblicare rst (“RandomNumber„) = Rnd rst. Aggiornamento rst.MoveNext Ciclo DoCmd.OpenQuery “qryRandomRecords„ Funzione di conclusione