Lancer une ou plusieur macro .vbs depuis le bureau

JCGL

XLDnaute Barbatruc

• 20 Avril 2013

• #2

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

Bonjour à tous,

Qu'est sensé faire ceci : Xl.enableeventpulse

A+ à tous

 

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 20 Avril 2013

• #3

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

Chahyd2010 à dit:

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

Cliquez pour agrandir...

Bonjour

supprimer cette ligne

et lancer le vbs

 

Vote positif 0 Vote négatif

C

Chahyd2010

XLDnaute Nouveau

• 20 Avril 2013

• #4

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

Bonjour JCGL,

Justement je ne sais pas,

 

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 20 Avril 2013

• #5

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")

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 20 Avril 2013

• #6

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

 

Pièces jointes

• Test.zip

  13.1 KB · Affichages: 31
• Test.zip

  13.1 KB · Affichages: 38
• Test.zip

  13.1 KB · Affichages: 40

Vote positif 0 Vote négatif

C

Chahyd2010

XLDnaute Nouveau

• 20 Avril 2013

• #7

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?

 

Vote positif 0 Vote négatif

C

Chahyd2010

XLDnaute Nouveau

• 20 Avril 2013

• #8

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

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 20 Avril 2013

• #9

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

 

Vote positif 0 Vote négatif

C

Chahyd2010

XLDnaute Nouveau

• 20 Avril 2013

• #10

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

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 20 Avril 2013

• #11

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

Bonjour à tous,

Utilise cette syntaxe :

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

Cliquez pour agrandir...

A+ à tous

 

Vote positif 0 Vote négatif

C

Chahyd2010

XLDnaute Nouveau

• 20 Avril 2013

• #12

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

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

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 20 Avril 2013

• #13

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

 

Vote positif 0 Vote négatif

C

Chahyd2010

XLDnaute Nouveau

• 20 Avril 2013

• #14

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

 

Pièces jointes

• Classeur1.xlsx

  17.4 KB · Affichages: 44
• Classeur1.xlsx

  17.4 KB · Affichages: 48
• Classeur1.xlsx

  17.4 KB · Affichages: 46

Vote positif 0 Vote négatif

C

Chahyd2010

XLDnaute Nouveau

• 20 Avril 2013

• #15

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

 

Vote positif 0 Vote négatif