Ouvrir, modifier, sauvergarder puis fermer un classeur

[adam75]

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

 

[bqtr]

Re : Ouvrir, modifier, sauvergarder puis fermer un classeur

Bonjour adam75,

Je pense que cela vient de cette ligne :

ActiveWorkbook.Saved = True

Cette instruction fait que justement, les dernières modifications ne sont pas enregistrées à la fermeture du fichier.

Essaye comme ca :

ActiveWorkbook.Save

A+

 

[adam75]

Re : Ouvrir, modifier, sauvergarder puis fermer un classeur

Genial 😱 Ca marche impec merci beaucoup bqtr !!!!! 🙂