Lancer une ou plusieur macro .vbs depuis le bureau

Bonjour a tous,

Pourriez vous m'aider a résoudre mon problème.
Je souhaite lancer une macro depuis le bureau et pour ce faire j'ai fait des recherches sur le net et j'ai trouvé un petit programme.
J'ai modifié le nom du fichier recherché et le nom de la macro et mis le tout dans un fichier .txt dont j'ai modifié l’extension en .vbs.
Le souci est qu'il me mes un message d'erreur : "cet ojet ne gére pas cette propriété ou cette méthode: 'enable'
et plus bas code:800A01B6
La ligne en question est en rouge ci-dessous

Dim Xl
dim wk
Set Xl = WScript.CreateObject("EXCEL.application")
Xl.Visible = True
Xl.enableeventpulse
set Wk = Xl.workbooks.open("c:NONDUFICHIEREXCEL")
Xl.Run "NOMDELAMACRO"
wk.save
wk.close
xl.quit

d'avance merci pour votre aide
Ps: je suis sous Excel 2007 mais au travail sous 2003