Bonjour,

J'ai un problème au niveau de mon code, je n'arrive pas à appliquer ma macro sur un autre fichier Excel.
En faite, j'ai un UserForm avec deux boutons et ma macro dans le même Fichier

1er bouton : Récupére le chemin du fichier sur lequel je veux appliquer ma macro et le stocke dans une variable "Fichier" (De la forme "C:\...\monfichier.xls" --> Fonctionne bien)
2ème bouton : Applique la macro sur le fichier stocké dans la variable "Fichier" --> Fonctionne pas 'Fichier en cours d'utilisation' alors qu'il est fermé

Voici le code du 2eme Bouton ( certainement des erreurs mais je ne comprends pas...) :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
Private Sub MacroRess_Click()
 
 Set xlApp = CreateObject("Excel.Application")
 Set xlBook = xlApp.Workbooks.Add(Fichier)
 xlApp.Application.Run "C:\Users\...\FichierMacro.xlsm!Module1!Macro1"
 xlApp.ActiveWorkbook.Save
 xlApp.ActiveWorkbook.Close
 Set xlApp = Nothing
 Set xlBook = Nothing
 
End Sub
Toute aide est la bienvenue !