A Query that only shows the lastest/Last record for each vendor

gheyman

Well-known Member
Joined
Nov 14, 2005
Messages
1,682
If I had a table with vendor history of each purchase they made (the table has the same customer listed numerous times under VendorName). The table has a "CreatedDate" field that puts the date the record was created in it and the table also has an AutoCount field "ID_NISTSL". So there are two ways to determine which is the last record entered into the table.

Is there a way to query (or only see) the last record (most recent) for each customer?

Thanks!
 

Joe4

MrExcel MVP, Junior Admin
Joined
Aug 1, 2002
Messages
51,428
Office Version
365
Platform
Windows
Re: Access: A Query that only shows the lastest/Last record for each vendor

I would recommend using the date field. If the AutoCount field is an Autonum field, you cannot rely on it always to be increasing (though it usually is, it cannot guarantee it).

Here is SQL code for a query that should do what you want:
Code:
SELECT Table1.*
FROM Table1
INNER JOIN
[COLOR=#0000ff](SELECT Table1.VendorName, Max(Table1.CreatedDate) AS MaxOfCreatedDate[/COLOR]
[COLOR=#0000ff]FROM Table1[/COLOR]
[COLOR=#0000ff]GROUP BY Table1.VendorName) as Lst[/COLOR]
ON Table1.VendorName = Lst.VendorName AND Table1.CreatedDate = Lst.MaxOfCreatedDate;
Just change all references of "Table1" with the name of your table.
 

gheyman

Well-known Member
Joined
Nov 14, 2005
Messages
1,682
Re: Access: A Query that only shows the lastest/Last record for each vendor

Thanks, Joe

Wht if I wanted to group by two fields VendorName and CommType? Is it possible to group by more than one?

And can you add Criteria?

WHERE (((tbl_NIS_TSL.VendorName) Like [Forms]![frm_NIS_TSL]![Combo227]) AND ((tbl_NIS_TSL.CommType) Like [Forms]![frm_NIS_TSL]![Combo232]) AND ((tbl_NIS_TSL.Debarred) Like [Forms]![frm_NIS_TSL]![Combo229]) AND ((tbl_NIS_TSL.Approval_Status) Like [Forms]![frm_NIS_TSL]![Combo234]))
ORDER BY tbl_NIS_TSL.VendorName, tbl_NIS_TSL.CreatedDate DESC;
 
Last edited:

Joe4

MrExcel MVP, Junior Admin
Joined
Aug 1, 2002
Messages
51,428
Office Version
365
Platform
Windows
Re: Access: A Query that only shows the lastest/Last record for each vendor

Sure. You would just first add it to both the SELECT and GROUP BY clauses of the query in blue, and then add another AND to the end of the JOIN to join on this field too.

Note that instead of using an embedded query like this, you can do this in two queries, which allows you to do it all using the Query Builder.

Query 1:
This is your Aggregate Query, where you only select the fields you want to group by and the field you want to aggregate by.
You select those fields, and hit the Totals button (looks like a Sigma).
This adds a Totals row with the phrase "Group By" under all three fields.
Change "Group By" to "Max" under the CreatedDate field to return the latest date for each grouping.
So, when this is finished, you have a listing of every unique Grouping, and the latest date for each grouping.

Query 2:
If you want other fields displayed from your table other than the three fields in the previous query, simply join the original table to Query 1, joining on ALL three fields from Query 1.
Then you can elect to return any fields you want from the original table.

That is what the embedded query I originally created does. It can be done either way.
Once built, you do not have to open Query 1 at all, just Query 2.
 

gheyman

Well-known Member
Joined
Nov 14, 2005
Messages
1,682
Re: Access: A Query that only shows the lastest/Last record for each vendor

Thank you!
 

Joe4

MrExcel MVP, Junior Admin
Joined
Aug 1, 2002
Messages
51,428
Office Version
365
Platform
Windows
Re: Access: A Query that only shows the lastest/Last record for each vendor

You are welcome.
 

Forum statistics

Threads
1,081,661
Messages
5,360,338
Members
400,581
Latest member
Eskimo

Some videos you may like

This Week's Hot Topics

  • VBA (Userform)
    Hi All, I just would like to know why my code isn't working. Here is my VBA code: [CODE=vba]Private Sub OKButton_Click() Dim i As Integer...
  • List box that changes fill color
    Hello, I have gone through so many pages trying to figure this out. I have a 2020 calendar that depending on the day needs to have a certain...
  • Remove duplicates and retain one. Cross-linked cases
    Hi all I ran out of google keywords to use and still couldn't find a reference how to achieve the results of a single count. It would be great if...
  • VBA Copy and Paste With Duplicates
    Hello All, I'm in need of some input. My VBA skills are sub-par at best. I've assembled this code from basic research and it works but is...
  • Macro
    is it possible for a macro to run if the active cell value is different to the value above it
  • IF DATE and TIME
    I currently use this to check if date has passed but i also need to set a time on it too. Is it possible? [CODE=vba]=IF(B:B>TODAY(),"Not...
Top