Ouvrir, modifier, sauvergarder puis fermer un classeur

Ouvrir, modifier, sauvegarder puis fermer un classeur

Bonsoir tout le monde,

Je crois que je vais devenir fou !! J'ai une macro dans un classeur 1 qui m'ouvre un classeur 2, lance une macro dans ce classeur 2 qui modifie le classeur 2 (elle fait un copier/coller) puis l'enregistre, le ferme et reviens au classeur 1.

Le problème c'est qu'elle fait bien ça mais pour une raison que j'ignore elle n'enregistre pas les modifs dans le classseur 2.

Voilà la macro.

Private Sub CommandButton1_Click()

Dim Wb As Workbook
MonPath = ActiveWorkbook.Path
Set Wb = Workbooks.Open(MonPath & "\" & "Classeur2.xls")
Sheets("Feuil1").Activate
Application.Run "Macro1"
ActiveWorkbook.Saved = True
ActiveWorkbook.Close
Windows("Classeur1.xls").Activate

End Sub

Cliquez pour agrandir...