[VBA-E]Application.run avec paramètres
J'ai un tou... Comment lancer une macro, avec paramètres, se trouvant dans une macro complémentaire ?
Code:
1 2 3 4 5 6 7 8 9
| Sub LancerEnregistrement()
Dim Chemin As String, MonFich As String, NomComplet
Chemin = "D:\xls\"
MonFich = "Cmonfichier"
Application.AddIns.Add("C:\Program Files\Microsoft Office\Office\Macrolib\EnregistrerFichierIncremente.xla").Installed = True
NomComplet = "'EnregistrerFichierIncremente.xla'!" & "FermerLeFichier(""" & _
Chemin & """, """ & MonFich & """)"
Application.Run (NomComplet)
End Sub |
Merci, le bon dieu vous le rendra :lol:
NB - L'install de la macro s'effectue normalement.