Sujet Précédent Sujet Suivant

[VB5] Comment voir si Office (E est intallé ?

Résolu/Fermé
jlb59 Messages postés 343 Date d'inscription mercredi 25 août 2004 Statut Membre Dernière intervention 8 mars 2024 - 14 mars 2006 à 13:51
 Lupin - 15 mars 2006 à 02:02
Bonjour à tous,

J'ai fait un petit prg sous VB5 dans lequel je pose la question pour savoir si Excel est installé ou non.

Comme je voudrais supprimer cette question et savoir si c'est installé ou pas automatiquement, est-ce qq pourrait me dire où trouver l'API adéquate ?

Merci beaucoup.

1 réponse

Réponse 1 / 1
Lupin
15 mars 2006 à 02:02
Bonjour,

à défaut de l'API en question, une routine comme : 

Sub LirePresenceExcel()
    
    Dim oWsh, Resultat As Variant
    
    Set oWsh = CreateObject("WScript.Shell")
    Resultat = oWsh.RegRead("HKEY_CLASSES_ROOT\.xls\")
    If (InStr(1, Resultat, "Excel.Sheet", vbTextCompare) > 0) Then
        MsgBox "Excel présent"
    Else
        MsgBox "Excel absent"
    End If
    Set oWsh = Nothing
    
End Sub


devrait aussi faire le travail.

Lupin
0