Discussion :

[jérémyp8]

Bonjour,

Je pense que tout est dans le titre de mon message !, mais je m'explique quand meme !

J'ai deux fichier Excel

Fichier Excel A qui a une macro pour extraire des données word vers ce fichier
puis une marco pour exporter (transfert) ces données vers le Fichier Excel B qui est le resultat final pour l'utilisateur

j'ai déjà automatiser L'excution de ces macro dans l'odre a l'ouverture du Fichier A a condition que le Fichier Excel B est déjà ouvert

Avant Ce que je fais est que j'ouvre le Fichier A pour lancer les macro...a la fin jai mon resulat dans le Fichier Excel B

Ce que je veux est de faire une macro pour ouvrir le Fichier A pour lancer les macro a partir du Fichier B

Merci

[Invité]

Code :

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

1
2
3
4
5
6
7
8
9
Sub testFichierA()
Dim FichierA As Workbook
Dim FileA As String
FileA = "c:\test\FichierA.xls"
Dim MyMacro As String
MyMacro = "test"
Set FichierA = Workbooks.Open(FileA)
FichierA.Application.Run MyMacro
End Sub

[jérémyp8]

RE rdurupt

Merci pour ta réponse

J'ai essayé ta macro, elle a beugée en ouvrant plusieurs fois le fichier A sans s arreter... j'ai du forcer la fermuture

Pour l'instant, ce que je veux est tout simplement faire une macro pour ouvrire le fichier A a partir du fichier B

Voila la macro a placer dans le Fichier B si ça peut intresser quelqu'un

Code :

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

1
2
3
4
5
6
7
8
9
Sub test()
 
Dim wb As Workbook
Dim ws As Worksheet
Set wb = Workbooks.Open("C:\A Test\Fichier A.xlsm")
Set ws = wb.Worksheets(1)
 'wb.Saved = True    Pour ne pas enregistrer le fichier Excel ouvert avant de sa fermuture
 'wb.Close           Pour Fermer le fichier Excel
End Sub

Merci