Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

lancer macro excel depuis dos

B

Béhaegel

Guest
Bonjour,

J'ai créé une macro sous excel que je souhaite lancer depuis l'invite de commande via un vbscript.

J'utilise pour cela la commande Application.Run comme tout le monde semble le conseiller.

Une instance excel s'ouvre après la commande worbook.open mais le fichier excel contenant la macro ne s'ouvre pas. Le script passe la commande Application.Run mais la macro ne s'exécute pas.

Ci-dessous, le contenu du script.


Main
Sub Main()
On Error Resume Next
Dim Objexc, x
Set Objexc = CreateObject("Excel.Application")
With Objexc.Application
.Visible = True
Workbooks.Open "C:\Eric\testmacro.xls"
MsgBox("xl ouvert ")
'Application.Run "testmacro.xls!test"
x = .Run("test",0)
End With
MsgBox("testmacro passé")
End Sub


Merci de m'indiquer pourquoi cela ne fonctionne pas.

NB : tout se trouve en local sur un PC sous XP pro

Cordialement,

Eric Béhaegel
 
A

Alain CROS

Guest
Bonjour

Le script doit ressembler a ça.

On Error Resume Next
Dim Objexc
Set Objexc = CreateObject("Excel.Application")
With Objexc
.Visible = True
.Workbooks.Open "C:\Eric\testmacro.xls"
.Run "test"
End With
set Objexc=Nothing

Alain CROS
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…