Lancer une ou plusieur macro .vbs depuis le bureau

[Chahyd2010]

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

 

[JCGL]

Re : Lancer une ou plusieur macro .vbs depuis le bureau

Bonjour à tous,

Qu'est sensé faire ceci : Xl.enableeventpulse

A+ à tous

 

[gilbert_RGI]

Re : 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

Bonjour

supprimer cette ligne

et lancer le vbs

 

[Chahyd2010]

Re : Lancer une ou plusieur macro .vbs depuis le bureau

Bonjour JCGL,

Justement je ne sais pas,

 

[gilbert_RGI]

Re : Lancer une ou plusieur macro .vbs depuis le bureau

double cliquer sur le vbs
excel va s'ouvrir et la macro va se lancer
ne pas oublier le antislash a cette ligne
set Wk = Xl.workbooks.open("c:\test.xls")

 

[JCGL]

Re : Lancer une ou plusieur macro .vbs depuis le bureau

Bonjour à tous,
Salut Gilbert,

Décompresser les deux fichiers sur la racine de C (j'ai mis en Rem le Application Quit...)

A+ à tous

 

[Chahyd2010]

Re : Lancer une ou plusieur macro .vbs depuis le bureau

Bonjour Gilbert_RGI,

Ligne supprimé sa fonctionne merci.

Puis-je exécuter cette macro pour en lancer 2 a la suite en un seul clic?

 

[Chahyd2010]

Re : Lancer une ou plusieur macro .vbs depuis le bureau

Merci a vous deux pour votre aide j'ai trouvé comment faire.
Il suffis d'effacer wk.save
wk.close
xl.quit
et ajouter Xl.Run "NOMDELA2émeMACRO" en fin de commande
Bonne journéehttp://www.excel-downloads.com/forum/images/smilies/wink.png

 

[JCGL]

Re : Lancer une ou plusieur macro .vbs depuis le bureau

Bonjour à tous,

Tu peux laisser le .Save et le .Close mais je te déconseille de laisser le .Quit : cela ferme l'application Excel

A+ à tous

 

[Chahyd2010]

Re : Lancer une ou plusieur macro .vbs depuis le bureau

Si je souhaite sauvegarder les modifications apporté a mon tableau sur une autre feuil, puis-je écrire

wk.save "CHEMIN D'ACCE DE LA SAUVEGARDE"
wk.close

 

[JCGL]

Re : Lancer une ou plusieur macro .vbs depuis le bureau

Bonjour à tous,

Utilise cette syntaxe :

WK.SaveAs "C:\Users\Jean-Claude\Downloads\Save.xls"

A+ à tous

 

[Chahyd2010]

Re : Lancer une ou plusieur macro .vbs depuis le bureau

Le fichier .vbs peut-il être utilisé pour ouvrir une cession AS400?

 

[JCGL]

Re : Lancer une ou plusieur macro .vbs depuis le bureau

Bonjour à tous,

Je ne connais pas AS400...

VBScript (diminutif de Microsoft Visual Basic Scripting Edition) est un sous-ensemble de Visual Basic utilisé en tant que langage de script d'usage général. Ce qui laisse supposer qu'il doit tourner sous Windows... Je pense...

A+ à tous

 

[Chahyd2010]

Re : Lancer une ou plusieur macro .vbs depuis le bureau

JCGL peut-tu jeter un œil sur se tableau et me dire ci tu a une idée a me soumettre

 

[Chahyd2010]

Re : Lancer une ou plusieur macro .vbs depuis le bureau

Merci pour l'info je vais faire une recherche sur les forums qui parlent de l'AS400