Bonjour,

Je me lance dans .hta et je voudrai lancer un fichier excel qui se trouve sur c:\monfichier.xls.
J'ai essayé ça
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Sub RunProgram 
    Const NORMAL_WINDOW = 1
    Set objShell = CreateObject("Shell.Application")
    objShell.ShellExecute "EXCEL.EXE", "C:\monfichier.xls", , , NORMAL_WINDOW
End Sub
Lancé avec
Code : Sélectionner tout - Visualiser dans une fenêtre à part
<input type="button" name="lien5" value="2 - Lancer&#10&#13Etatbudg" onclick="RunProgram" style="Font:bold;width:130px;Height:40px;color:#CC7A29"onclick>
mais j'ai un msg d'erreur code 800A01F4 variable non definie objShell

Avez-vous une solution

Merci