This method uses the registry to get the path, from one of the sources that the 'Run' command would use, and then gets the version number from the exe file:

q::
vList := "chrome.exe,firefox.exe,iexplore.exe,excel.exe"
vOutput := ""
Loop, Parse, vList, % ","
{
	RegRead, vPath, HKEY_LOCAL_MACHINE, SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\%A_LoopField%
	FileGetVersion, vPVersion, % vPath
	vOutput .= vPVersion "`t" vPath "`r`n"
}
Clipboard := vOutput
MsgBox, % "done"
return

Code: [Select all] [Download]GeSHi © Codebox Plus

MsgBox, % ComObjActive("Excel.Application").Version

Application.Version Property (Outlook)

Application.Version Property (Excel)

Application.Version Property (Word)