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

gheyman

Well-known Member
Joined
Nov 14, 2005
Messages
1,678
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,177
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,678
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,177
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,678
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,177
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,078,486
Messages
5,340,618
Members
399,387
Latest member
amrita34

Some videos you may like

This Week's Hot Topics

  • Problem with Radio Button's format control
    I am creating an employee evaluation template (a sample is below) Column A is the category Column B, C D, E and F will be ratings (unacceptable...
  • Last Display on userform to a Listbox
    [CODE=vba] lstdisplay.ColumnCount = 15 lstdisplay.RowSource = "A1:O600000" [/CODE] So when i do this it Displays everything on the sheet i am...
  • Rename and move files to a new location
    Dear all, I have an excel file with the following information. The actual file name is at column A but i want to rename it using the following...
  • Help with True/False Formula
    Hello! Am stumped how to fix this formula, in which my result returns 'True', but it should return False. =IF(AG2=True...
  • Clear extra characters from a provided range of cells
    Dear All, I have following code which gives me desired output to remove extra characters from a provided range. But it takes too much time when...
  • Help with Current and highest streaks
    Hi there, I've just joined the forum and this is my first post. I've already spent quite a bit of time searching the net and this forum for a...
Top