Можно ли из VBA определить версию офиса и сервиспака?

Shocker.Pro,

А сервис-пак?

Есть ключик HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\11.0\Common\ProductVersion,
но как определить какой он должен быть на каждом сервис-паке?

Для 2010 нашел такое:
Номер версии пакета обновления 2 для Office 2010 больше или равно 14.0.7015.1000.
Номер версии пакета обновления 1 для Office 2010 больше или равно 14.0.6029.1000 но меньше, чем 14.0.7015.1000.
Номер версии исходного выпуска RTM Office 2010 (то есть без пакетов) больше или равно 14.0.4763.1000 но меньше, чем 14.0.6029.1000.

Есть где-нибудь подобное для 2003, 2007?

http://support.microsoft.com/kb/821549/ru

Программы Office 2003 Версия исходного выпуска Пакет обновления 1 (SP1) Пакет обновления 2 (SP2)
Microsoft Office Access 2003 11.0.5614.0 11.0.6355.0 11.0.7969.0
Microsoft Office Excel 2003 11.0.5612.0 11.0.6355.0 11.0.7969.0
Microsoft Office FrontPage 2003 11.0.5516.0 11.0.6356.0 11.0.7969.0
Microsoft Office InfoPath 2003 11.0.5531.0 11.0.6357.0 11.0.7969.0
Microsoft Office 2003, любая версия 11.0.5614.0 11.0.6361.0 11.0.7969.0
Microsoft Office OneNote 2003 11.0.5614.0 11.0.6360.0 11.0.7969.0
Microsoft Office Outlook 2003 11.0.5510.0 11.0.6353.0 11.0.7969.0
Microsoft Office PowerPoint 2003 11.0.5529.0 11.0.6361.0 11.0.7969.0
Microsoft Office Project 2003, Standard или Professional 11.0.5614.0 11.0.6707.0 11.0.7969.0
Microsoft Office Publisher 2003 11.0.5525.0 11.0.6255.0 11.0.7969.0
Microsoft Office Word 2003 11.0.5604.0 11.0.6359.0 11.0.7969.0
Microsoft Office Visio 2003, Standard или Professional 11.0.3216.5614 11.0.4301.6360 11.0.7969.0

http://support.microsoft.com/kb/928116

2007 Office product name File name Original version SP1 version SP2 version SP3 version
2007 Microsoft Office suite Mso.dll 12.0.4518.1014 12.0.6213.1000 12.0.6425.1000 12.0.6607.1000
Microsoft Office Access 2007 Msaccess.exe 12.0.4518.1014 12.0.6211.1000 12.0.6423.1000 12.0.6606.1000
Microsoft Office Excel 2007 Excel.exe 12.0.4518.1014 12.0.6214.1000 12.0.6425.1000 12.0.6611.1000
Microsoft Office Groove 2007 Groove.exe 12.0.4518.1014 12.0.6211.1000 12.0.6421.1000 12.0.6600.1000
Microsoft Office InfoPath 2007 InfoPath.exe 12.0.4518.1014 12.0.6214.1000 12.0.6413.1000 12.0.6606.1000
Microsoft Office OneNote 2007 OneNote.exe 12.0.4518.1014 12.0.6211.1000 12.0.6415.1000 12.0.6606.1000
Microsoft Office Outlook 2007 Outlook.exe 12.0.4518.1014 12.0.6212.1000 12.0.6423.1000 12.0.6607.1000
Microsoft Office PowerPoint 2007 PowerPnt.exe 12.0.4518.1014 12.0.6211.1000 12.0.6425.1000 12.0.6600.1000
Microsoft Office Project 2007 WinProj.exe 12.0.4518.1014 12.0.6211.1000 12.0.6423.1000 12.0.6607.1000
Microsoft Office Publisher 2007 Mspub.exe 12.0.4518.1014 12.0.6211.1000 12.0.6423.1000 12.0.6606.1000
Microsoft Office SharePoint Designer 2007 Spdesign.exe 12.0.4518.1014 12.0.6211.1000 12.0.6423.1000 12.0.6606.1000
Microsoft Office Word 2007 WinWord.exe 12.0.4518.1014 12.0.6211.1000 12.0.6425.1000 12.0.6612.1000
Microsoft Office Visio 2007 VisLib.dll 12.0.4518.1014 12.0.6211.1000 12.0.6423.1000 12.0.6606.1000