Discussion :

[BryanBrown]

Bonjour, je m'aide beaucoup avec ce forum, mais la ma question???
Que va t'il se passer si Excel n'est pas installé lors de la déclaration :
Set XlApp = CreateObject("Excel.application") ?
Y-a-t'il un moyen de vérifier l'installation d'Excel avant afin de prévoir une méthode alternative?
Merci.

[Marc-L]

Bonjour,

via une gestion d'erreur ou encore vérifier la présence d'une clef dans la Base de Registres …

___________________________________________________________________________________________________________

Je suis Paris, Egypte, Nigeria, New-York, Mogadicio, Barcelone, London, Manchester, Stockholm, Istanbul, Berlin, Nice, Bruxelles, Charlie, …

[ProgElecT]

Salut

Un moyen simpliste(car il y en a d'autres)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
dim XlApp
on error resume next
Set XlApp = CreateObject("Excel.application")
if err then
        msgbox "Excel n'est pas présent sur cette ordinateur"
        else
        msgbox "Excel est bien présent sur cette ordinateur"
        XlApp.visible=true
end if

Motif de l'édit: Marc-L a répondu le temps de la rédaction de ma proposition.