Discussion :

[gilbisti]

Est ce que quelqu un pourrait me donner la syntaxe permettant de piouvoir lancer une application excel et ouvrir le fichier book1.xls se situant sur c:\book1.xls et excecuter la macro Macro1 dans ce fichier excel.

En effet, je voudrais pouvoir executer ce fichier exe de maniere avec des taches planifiées merci pour votre aide.

[Manumation]

Pour ouvrir ton fichier en .bat, essaie :

start C:\book1.xls


Pour exécuter la Macro1, je pense qu'il y a une manipulation à faire dans le fichier excel pour qu'elle s'ouvre à l'ouverture du fichier...

[ouskel'n'or]

Et tu veux faire ça depuis une macro Excel ?
J'ai récupéré ça sur le forum

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Sub OuvrirUneNouvelleSessionExcel()
Dim XlApp As Object
Dim XlCl As Workbook
Dim Xlfl As Worksheet
    Set XlApp = CreateObject("Excel.Application") '< L'appli Excel
    With XlApp
        .Visible = True
        .ActiveWorkbook.RunAutoMacros xlAutoOpen
        Set XlCl = .Workbooks.Open("D:\xls\LeClasseur.xls") '< le classeur
        Set Xlfl = XlCl.Worksheets("Feuil1") '< la feuille
    End With
'******* Les macros du classeur appelant ne sont plus opérationnelles ******
'******* elles le redeviennent à la fermeture de cette nouvelle session ******
    XlCl.Close False 'ou true
    XlAppli.Quit
    Set XlAppli = Nothing
    Set XlCl = Nothing
    Set Xlfl = Nothing
End Sub

Tu dis

PS - Pour lancer une macro dans cette session, ce doit être un "truc" comme ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

XlApp.run "'" & XlCl.name  & "'!NomDeLaProcédure"

Jamais testé

[gilbisti]

merci pour ces reponse je souhaiterais opouvoirlancer la macro Macro 1 a l ouvertuyre du fichier excel Book1.xls en fait.

[ouskel'n'or]

merci pour ces reponse je souhaiterais opouvoirlancer la macro Macro 1 a l ouvertuyre du fichier excel Book1.xls en fait.

Alors c'est plus simple que le PS de mon dernier message, tu mets ta macro dans un module standard et, dans ThisWorkbook, tu mets

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub Workbook_Open()
    NomDeLaMacro
End sub

A+

[ouskel'n'or]

C'est une autre question (pour laquelle je n'ai pas la réponse) je la déplace sur le forum
L'intitulé sera
"ouvrir la messagerie lotus notes a partir d'un .bat et intro auto du mot de passe?"
A+

[gilbisti]

ok merci par contre concernant l execution de macro a l ouverture du fichier excel ca ne marche pas l application.bat m ouvre le fichier excel mais la macro ne se lance pas est ce normal?

[dadavyvy]

Quel est ton niveau de sécurité d'Excel? Manuellement, quand tu ouvres le fichier, la macro s'execute?

[ouskel'n'or]

Comme je t'ai mis, je n'ai jamais testé.
Si tu es dans une version antérieure à la mienne (2003) essaie de mettre, dans un module standard, la sub

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub Auto_Open()
     NomDeLaMacro
end sub

et si ça ne fonctionne toujours pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub Workbook_Open()
    ActiveWorkbook.RunAutoMacros Which:=xlAutoOpen
End Sub
 
Sub Auto_open()
     NomDeLaMacro
End sub

Si ça ne fonctionnes toujours pas, essaie
Dans ThisWorkbook

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sub Workbook_Open()
    Application.EnableEvents = True
    NomDeLaMacro
End sub

Après ? Je suis sec !
A+

[gilbisti]

un grand merci a toi bonhomme

Bonne journee et a bientot

*C'etait Workbook open qui marchait