Report: Show only newest Office

[ar-online]

Hi there

Well i have a Question.
I'm adding a new software to ower range and i would like to see which PCs have a new enough office version.
The problem is, when i use this code:

Select Top 1000000 tblComputers.Computername, tblComputers.ComputerUnique, tblComputers.Domain, tblComputersystem.Model, tblComputers.LastknownIP, tblComputers.Username, Web40OSName.Compimage As icon, tblSerialnumber.ProductKey, tblSerialnumber.Product From tblComputers Inner Join tblOperatingsystem On tblComputers.Computername = tblOperatingsystem.Computername Inner Join tblComputersystem On tblComputers.Computername = tblComputersystem.Computername Inner Join tblComputersystem tblComputersystem_1 On tblComputers.Computername = tblComputersystem_1.Computername Inner Join web40ActiveComputers On tblComputers.Computername = web40ActiveComputers.Computername Inner Join Web40OSName On Web40OSName.Computername = tblComputers.Computername Inner Join web40CorrectMemory On web40CorrectMemory.Computername = tblComputers.Computername Inner Join tblSerialnumber On tblComputers.Computername = tblSerialnumber.Computername Where tblSerialnumber.Product Like '%Microsoft Office%'

On some PCs we upgraded the Office Version like from 2007 to 2010, now in this list i see not only the now installed but also the uninstalled version.
How can i like say only chow me the last changed Office? so example lists:

before:
test-pc1, office 2003
test-pc1, office 2007
test-pc2, office 2007
test-pc3, office 2007
test-pc3, office 2010

after:
test-pc1, office 2007
test-pc2, office 2007
test-pc3, office 2010

Thanks

[ar-online]

Thanks

That is what i was looking for.

[Hemoco · Accepted solution]

TblSerialnumber contains scanned product keys, not scanned software information. To report on software installations you should use tblSoftware. Please try the report below.

Microsoft Office product keys are often left behind after an uninstall, which explains why you still find old keys in tblSerialnumber.

Select Top 1000000 tblComputers.Computername, tblComputers.ComputerUnique,
tblComputers.Domain, tblComputersystem.Model, tblComputers.LastknownIP,
tblComputers.Username, Web40OSName.Compimage As icon,
tblSoftware.softwareName, tblSoftware.softwareVersion,
tblSoftware.SoftwarePublisher, tblSoftware.Installdate,
tblSoftware.Lastchanged
From tblComputers Inner Join
tblComputersystem On tblComputers.Computername =
tblComputersystem.Computername Inner Join
web40ActiveComputers On tblComputers.Computername =
web40ActiveComputers.Computername Inner Join
Web40OSName On Web40OSName.Computername = tblComputers.Computername Inner Join
tblSoftware On tblComputers.Computername = tblSoftware.ComputerName
Where tblSoftware.softwareName Like '%Microsoft Office%'
Order By tblComputers.ComputerUnique, tblSoftware.softwareName