Mit nur 5 anderen Möglichkeiten sein es ein wenig iffy, ein wirklich gelegentliches Einzelteil zu erhalten, aber Sie können Gebrauch tun das Rnd und Funktion wie gezeigt randomisieren unten, eine temporäre Tabelle im gelegentlichen Auftrag „zu bestellen“. Ich hatte eine Tabelle, die „tCustomers“ genannt und aufbaute eine Frage, um meine neuen nach dem Zufall bestellten Daten zu zeigen en.
Diesen Aufstellungsort sehen, in dem ich schamlos die Kernideen für diese Methode kopierte:
http://www.fontstuff.com/vba/vbatut02.htmMerken, dass ich eine Frage addierte, die „qryRandomRecords“ genannt. Der SQL für diese Frage ist:
OBERSEITE 25 tmpCustomers.sName, tmpCustomers.sStreet, tmpCustomers.RandomNumber VORWÄHLEN
Von den tmpCustomers
AUFTRAG DURCH tmpCustomers.RandomNumber;
Sie konnten dieses verwenden, um eine Temptabelle für Ihre Verkäufer zu errichten, dann ergreifen gerade die erste Aufzeichnung, die durch diese Frage zurückgebracht:
Schwaches rst als DAO.Recordset
Rst = Currentdb.OpenRecords („AUSERWÄHLTE OBERSEITE
1 einstellen von den qryRandomRecords“)
Msgbox rst. Felder (0)