Bonjour Salva,
Le plus simple est peut-être d'utiliser Interop :
Imports Microsoft.Office.Interop
Dim newApp As New Microsoft.Office.Interop.Excel.Application()
MessageBox.Show("Excel version : " & newApp.Version)
Ensuite il est fort probable que les différents composants d'Office soit de la même version. Par contre certains ne sont peut être pas installés, notamment Access. Pour cela tu peux vérifier l'existence de la clé :
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\MSACCESS.EXE
La valeur Path de cette clé est le chemin de l'application, qui donne aussi la version, ici :
C:\Program Files (x86)\Microsoft Office\Office14\
Par contre la version indiquée est la numérotation "interne" : Office 2010 = 14.0 ,dans les deux cas (Interop ou registre)
Cordialement, Jacques
