Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Comment excecuter une macro excel à partir d'un script vbs

Comment excecuter une macro excel à partir d'un script vbs

4 réponses
Avatar
JJK94
Win xp , office 2003

Comment à partir d'un script VBS , exécuter une macro dans un fichier EXCEL
, sans ouvrir l'application .

Merci pour votre aide
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
papou
Bonjour
, sans ouvrir l'application
Ce n'est pas possible à ma connaissance.

Par contre il est possible de lancer l'application sans qu'elle soit
visible, tu reviens vers nous si ça t'intéresse !

Cordialement
Pascal

"JJK94" a écrit dans le message de news:

Win xp , office 2003

Comment à partir d'un script VBS , exécuter une macro dans un fichier
EXCEL , sans ouvrir l'application .

Merci pour votre aide





Avatar
michdenis
Bonjour JJK94,

Dans l'application NotePad, copie ceci et enregistre ton fichier
avec une extension .vbs.

Tu adaptes le nom du classeur à ouvrir et le nom de le nom
de la macro à exécuter. Ta macro est dans un module standard.

La ligne de code Xl.Visible = True
peut aussi prendre la valeur False...
Mais teste d'abord ton fichier .vbs et lorsque tout se déroule
comme prévue, tu passes la valeur False...

Attention ... de pas fermer ton fichier 2 fois, une dans ta macro
et l'autre à partir du fichier vbs -> génère une erreur !

'--------------------------
Dim Xl
dim wk
Set Xl = WScript.CreateObject("EXCEL.application")
Xl.Visible = True
Xl.enableeventsúlse
set Wk = Xl.workbooks.open("c:atestmacro.xls")
Xl.Run "NOMDELAMACRO"
xl.save
xl.close
'--------------------------


Salutations!



"JJK94" a écrit dans le message de news:
Win xp , office 2003

Comment à partir d'un script VBS , exécuter une macro dans un fichier EXCEL
, sans ouvrir l'application .

Merci pour votre aide
Avatar
JJK94
Merci Michdenis, ça marche bien ,
pour fermer le fichier , faire xl.workbooks.close .

JJK

"michdenis" a écrit dans le message de news:
%23$kj2%
Bonjour JJK94,

Dans l'application NotePad, copie ceci et enregistre ton fichier
avec une extension .vbs.

Tu adaptes le nom du classeur à ouvrir et le nom de le nom
de la macro à exécuter. Ta macro est dans un module standard.

La ligne de code Xl.Visible = True
peut aussi prendre la valeur False...
Mais teste d'abord ton fichier .vbs et lorsque tout se déroule
comme prévue, tu passes la valeur False...

Attention ... de pas fermer ton fichier 2 fois, une dans ta macro
et l'autre à partir du fichier vbs -> génère une erreur !

'--------------------------
Dim Xl
dim wk
Set Xl = WScript.CreateObject("EXCEL.application")
Xl.Visible = True
Xl.enableeventsúlse
set Wk = Xl.workbooks.open("c:atestmacro.xls")
Xl.Run "NOMDELAMACRO"
xl.save
xl.close
'--------------------------


Salutations!



"JJK94" a écrit dans le message de news:

Win xp , office 2003

Comment à partir d'un script VBS , exécuter une macro dans un fichier
EXCEL
, sans ouvrir l'application .

Merci pour votre aide






Avatar
michdenis
Voici les correctifs apportés au dernière ligne du vbscrpit

'--------------------------
Dim Xl
dim wk
Set Xl = WScript.CreateObject("EXCEL.application")
Xl.Visible = True
Xl.enableeventsúlse
set Wk = Xl.workbooks.open("c:atestmacro.xls")
Xl.Run "NOMDELAMACRO"
wk.save
wk.close
xl.quit
'--------------------------


Salutations!