Lancer une macro d'un autre classeur excel

Résolu/Fermé
Emic - 5 juil. 2011 à 11:39
 Soignisec - 30 mars 2017 à 17:26
Bonjour,

Je vous écris car j'ai un petit soucis de programmation :
j'ai un classeur 1 qui a une macro s'appelant test dans le module 1
et dans le classeur 2 j'aimerai faire une macro lancant la macro test du classeur 1

j'ai essayé de faire ça :

Sub OuvreSiPasOuvert()
Dim Worbk As Workbook
On Error Resume Next
Set Worbk = Workbooks("Macro tps de cycle.xls")
On Error GoTo 0
If Worbk Is Nothing Then Workbooks.Open "R:\DH_SCE\Toutes SCE\Macros\Macro tps de cycle.xls" _
Else: Set Worbk = Nothing
Call Workbooks("Macro tps de cycle.xls").Module1.test

Mais... ça ne marche pas...

Merci de m'aider


A voir également:

3 réponses

Problème résolu : il fallait pas oublié les '
Application.Run ("'Macro tps de cycle.xls'!test")
voila!!!
19
michel_m Messages postés 16581 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 12 novembre 2022 3 283
6 juil. 2011 à 13:56
Bien vu pour les guillemets!
0
Merci de ton aide dans tous les cas!
PS : t'as du les mettre dans ton fichier ms je n'arrivais pas à y accéder!^^
0
Merci !
Avec des variables, ça donne :
Application.Run ("'" & Fichier.Name & "'!test")

avec initialement :
Dim wb, Fichier As Workbook
For Each wb In Workbooks
If InStr(wb.Name, "Macro tps de cycle") = 1 Then
Set Fichier = wb
End If
Next
0