rnd mit vorheriger Auswahl der Anzhal (Access)
Hallo Floyd,
eigentlich hatte ich mir das ca wie folgt vorgestellt:
SELECT TOP [Geben sie eine Zahl ein] * FROM TAB1 ORDER BY Rnd(ID);
Aber wie ich gerade festgestellt habe, kann man Paramterwerte wohl an dieser Stelle nicht verwenden. Sorry. Man lernt halt nie aus...
Da bleibt nur VBA. Nehmen wir an, du willst den Wert in einem Formular in ein Textfeld namens "Text1" eingeben, wäre das hier ein Ansatz:
Private Sub Text1_AfterUpdate() Dim db As DAO.Database, rs As DAO.Recordset Set db = CurrentDb Set rs = db.OpenRecordset("SELECT Top " & Me.Text1 & " * FROM TAB1 ORDER BY Rnd(ID)") rs.MoveLast MsgBox rs.RecordCount Set rs = Nothing Set db = Nothing End Sub
Was du sonst so mit dem Recordset machst, bleibt dir überlassen
Martin
gesamter Thread:
- rnd mit vorheriger Auswahl der Anzhal -
Floyd,
31.08.2020, 13:09
- rnd mit vorheriger Auswahl der Anzhal -
Martin Asal,
31.08.2020, 18:48
- rnd mit vorheriger Auswahl der Anzhal -
Floyd,
02.09.2020, 12:56
- rnd mit vorheriger Auswahl der Anzhal -
Martin Asal,
02.09.2020, 18:21
- rnd mit vorheriger Auswahl der Anzhal - Floyd, 03.09.2020, 11:36
- rnd mit vorheriger Auswahl der Anzhal -
Martin Asal,
02.09.2020, 18:21
- rnd mit vorheriger Auswahl der Anzhal -
Floyd,
02.09.2020, 12:56
- rnd mit vorheriger Auswahl der Anzhal -
Martin Asal,
31.08.2020, 18:48