Find record for sidste dato

det kommer an på hvordan du har lavet dato'en... hvis du har lavet den på 'engelsk'-facon, "2003-06-26" kan du jo bruge max() og lave en 'where cpr = 'et_eller_andet'.... Hvis du har lavet den med dansk dato ved jeg det desværre ikke....

et eksempel:

SQL = "SELECT MAX(RykkerDto) From Tabel WHERE CPR = '010101-0101'"

Dates in Access are stored in the dB in the same way no matter which region you are using!

Ok :)
så ved jeg det....

Jeg skal ikke finde maks. rykkerdato, men hele recorden for den sidste dato ?

Hvis man bruger
SELECT Max(RykkerDto) AS Udtryk1, RykkerNr, Intersnr
FROM tblRykker
GROUP BY RykkerNr, Intersnr;

så findes hver rykker for hver maks(rykkerdto) !

RykkerDto    RykkerNr    Intersnr
14-04-03        aah8            111111111
16-06-03    prv2            111111111
19-05-03    prv1            111111111

Her skal findes
19-06-03 prv2 111111111
da den er den sidste rykker som er sendt !

er det ikke fordi du mangler "WHERE CPR = 'et_eller_andet'"

Jeg skal ikke finde for en enkelt record... Jeg skal have en liste med alle kundernes seneste rykkerbrev.

where is the cpr number here?

Sry, Intersnr is the cpr nr.

OK, here is one solution, I am sure there are others which are maybe smarter :o)

First make a query and name it qryLastRykkerDto

SELECT tblRykker.Intersnr, Max(tblRykker.RykkerDto) AS MaxOfRykkerDto
FROM tblRykker
GROUP BY tblRykker.Intersnr;

Then make another query and name it qryLastRykker

SELECT tblRykker.*
FROM tblRykker INNER JOIN qryLastRykkerDto ON (tblRykker.RykkerDto = qryLastRykkerDto.MaxOfRykkerDto) AND (tblRykker.Intersnr = qryLastRykkerDto.Intersnr);

Hi terry,
sry I didnt write that, but I need a single SQL string because it's from word vba and we dont have access to create query'es in the Access database.

Sorry I dont have time at the moment, maybe this evening or at the weekend!

Hope this is what you want

SELECT R1.CPR, Max(R1.RykkerDto) AS MaxOfRykkerDto, (select R2.RykkerNr FROM tblRykker R2 WHERE R2.CPR = R1.CPR AND R2.RykkerDto = (Select Max(R3.RykkerDto) FROM tblRykker R3 WHERE R2.CPR = R3.CPR)) AS nr
FROM tblRykker AS R1
GROUP BY R1.CPR;

Martin>Hows it going here?

hello!

so sry - by some reason I didn't get mail that there were new answers to the Q.

I test it tomorrow on work, but your answer look correct (I couldn't remember how to include select's in the select-query).

does it work?

It works perfectly. Thx a lot for helping me solving this one.

... and have a perfectly weekend enjoying the Danish summer ;-)

selv tak og god weekend til dig også :o)