Det jeg ønsker er at have en forespørgsel, hvor jeg kan indtaste et antal, som eks. her kunne være 20. Forespørgslen skal nu finde de poster, hvor Antal tilsammen giver 20. Men den skal samtidigt vise de poster som er indimellem, hvor der ikke står noget i antal.
Den skal altså tælle fra oven af og nedefter, og når den rammer det antal som jeg indtaster skal den stoppe, og vise mig de poster som den har fundet fra ovenaf og ned til og med den sidste post, som sammentællingen giver.
I mit eksempel med at indtaste 20, skal den altså vise mig posterne fra 123 til og med 754.
is there a field which the query can be sorted on? (autonumber) What if it isnt possible to hit exactly 20? For example if you entered 21 you coul deither stop at 754 which is less than 21 or 245 which is the record giving 20 or more!
Synes godt om
Slettet bruger
28. august 2007 - 22:26#2
Hvis du nu har en formular, som viser posterne og du laver et tekstfelt, som hedder IndtastTal. Så er her en mulighed!~)
Option Compare Database Option Explicit Private Sub IndtastTal_AfterUpdate() Dim db As DAO.Database Dim rst As DAO.Recordset Dim ialt As Integer Dim linier As Integer
If IsNull(Me.IndtastTal) Then Me.RecordSource = "TabelNavn" Exit Sub End If
Set db = CurrentDb Set rst = db.OpenRecordset("TabelNavn") ialt = 0 linier = 0
With rst .MoveFirst Do ialt = ialt + Nz(![Antal], "0") linier = linier + 1
If ialt > Me.IndtastTal Then Me.RecordSource = "SELECT TOP " & linier - 1 & " TabelNavn.* FROM TabelNavn;" .Close Exit Sub End If
.MoveNext Loop Until .EOF .Close End With End Sub
Synes godt om
Slettet bruger
28. august 2007 - 22:31#3
Du kan sætte endnu en if sætning ind:
If ialt = Me.IndtastTal Then Me.RecordSource = "SELECT TOP " & linier & " TabelNavn.* FROM TabelNavn;" .Close Exit Sub End If
Det kommer lidt an på hvad du vil med de tomme poster... men du kan selv lige lege lidt med det!~)
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.