Formel

Select Top 5.....
Order By Sum([Point_opdræt])

Tak for dit hurtige svar
men jeg ved ikke hvor jeg skal skrive det.
=Sum([Point opdræt]) er skrevet direkte i feltet.
vil du uddybe det lidt.

=Sum([Point opdræt]) er skrevet direkte i feltet

Det nå så være som postkilde i et ubundet felt.

Det jeg skrev er som en SQL-sætning i en forespørgsel. Rpøv at åvbe i en ny tom forespørgsel og træk relevante felter ned i forespørgselsgitteret. Deretfer Vis > Totaler og vælg
Sum under feltet Point_opdræt.

Kør forespørgslen og se om det fungerer. Derefter åbner du forespørgslen i SQL-visning og lige efter Select skriver du Top 5. Sorter efter Point_opdræt faldende.

Det prøver jeg iaften.

OK - Ellers kan du prøve at sende din db (eller dele deraf) som en .zip fil i version 2003. Så ser jeg på det.

mugs snabelting mail.dk

jeg er glad for gider hjælpe mig.

Jeg vil gerne forklare hvad jeg skal bruge databasen til.
det er en udstillingsdatabase til Kanarie fugle.

når fuglene er bedømt indskriver jeg pointene.
den der få flest point på 5 fugle bliver vinder, og er der to der har lige meget går man vidre til 6 fugle

på rapporten har jeg grupperet på fakturanr.og pointopdræt
og derfor  =Sum([Point opdræt])
jeg ved ikke om jeg kan gøre det samme i en forspørelse
nu prøver jeg:

Nu kommer der et fakturanr ind i billedet. Er alle 5 fugle tilhørende en opdrætter anført på samme fakturanr?

Hvis det er tilfældet, så prv kun at medtage felterne fakturanr og point_opdræt i forespørgslen. Derefter Vis > Totaler med en gruppering på fskturanr og en Sum på point_opdræt og sorter faldende på Point_opdræt. Fungerer det, så indsæt en Top 5 i SQL-sætningen.

Hej mugs

jeg kommer først tilbage nu fordi jeg har mit arbejde at passe.

Jeg har lavet en forespørgelse som du skrev og der virker.
men jeg ved ikke hvor jeg skal sætte "top 5"

SELECT tmpFaktura_Under.Fakturanr, [Faktura over].Navn, Sum(tmpFaktura_Under.[Point Opdræt]) AS [SumOfPoint Opdræt]
FROM tmpFaktura_Under INNER JOIN [Faktura over] ON tmpFaktura_Under.Fakturanr = [Faktura over].Fakturaid
GROUP BY tmpFaktura_Under.Fakturanr, [Faktura over].Navn
ORDER BY Sum(tmpFaktura_Under.[Point Opdræt]) DESC;

hvis jeg skriver efter Select så er det kun de 5 bedste fakturanr. der vises
hver fakrura inderholder mange point det er summen de 5 bedste point i hver faktura jeg skal bruge
vil du hjælpe mig??

Selvfølgelig vil jeg hjælpe - Det er jo det eksperten er til for.

Når du opsummerer nogle poster, er det jo en samling af poster du får. D.v.s. at for hver post for f.eks. Fakturanr og navn skifter får du en ny gruppe og derfor får du "fordelt" points over flere grupper, hvor du ønsker dem samlet i een gruppe.

Prøv at lave en forespørgsel der kun indeholder 2 felter:

- Fakturanr 
- Point_opdræt

Derefter igen Vis > Totaler med en gruppering af Fakturanr og en sum under point_opdræt

Så får du alle fakturanr samlet med en samlet sum under point_opdræt. Prøv derefter en Top 5:

Select Top 5....

Hej igen

jeg er ikke så god til at forklare jeg prøver igen:

fakturanr. 39  point 91
  Navn: per          90
                      90
                      89
                      89 = 449
                      89
                      88
                      87

fakturanr. 40  POINT  92
    Navn: søren      91
                      90
                      90
                      90 = 453  VINDER
                      89
                      87

  det er kun de 5 bedste point der deltage i kapløbet
og er 2 faktura med lige mange point er det de 6 bedste de
giver vinderen.

OK - Jeg har ikke tid lige nu, men ser på det senere. Har du evt. et udkast til en db jeg kan arbejde på

Skal jeg sende hele databasen til dig
den fylder som zippet 5,09 mb

5,09 er for meget. Prøv at komprimere den:

Funktioner > Databasefunktioner > Komprimer og reparer.

Hvor meget fylder den?

der har jeg vist skrevet forkert!
den fylder 30.048 kb
zippet 5,22 kb

så jeg sender den til dig nu.

Der er ikke kommet noget endnu!

det er mig der er dum

jeg har prøvet at senden filen

men der er for stor
den fylder ca. 30.000 mb og zippet ca. 5.000 mb
så jeg kan ikke sende den
så jeg må nok opgive men !!

Har du husket at komprimere db?

Hej
ja det har jeg

men jag har lige sendt dig en skrabet db
jeg har fjernet all mine billeder og slettet mine rapporter
nu fylder den kun ca. 300 kb.

Db er returneret.
Der var ikke tale om en TOP 5, men om de 5 bedst placerede fugle pr. deltager.
Jag har stirret mig blind på TOP 5, men jeg tror det lykkedes til sidst.
Til almindelig orientering kom koden til at se således ud:

Dim VARa As Long
Dim VARb As Byte
DoCmd.GoToRecord acForm, "FRMresultat", acFirst, 1
VARb = 1
VARa = Me.Fakturanr
Do Until Me.NewRecord = True
If Me.Fakturanr = VARa Then
Me.Tæl5 = VARb
VARb = VARb + 1
Else:
VARb = 1
VARa = Me.Fakturanr
Me.Tæl5 = VARb
VARb = VARb + 1
End If
DoCmd.GoToRecord acForm, "FRMresultat", acNext, 1
Loop
DoCmd.GoToRecord acForm, "FRMresultat", acFirst, 1
DoCmd.OpenReport "RPTresultat", acViewPreview, "", "", acNormal
Reports("RPTresultat").ZoomControl = 100

Mange tak for hjælpen
hvis jeg kunne skulle du have mange flere point