tontonexcel
XLDnaute Occasionnel
Bonsoir à tous,
J'ai des difficultés concernant ce programme VBA joint
C'est un simple test sur un enregistrer sous et une fermeture
Rien ne plante seul le msgbox n'est pas exécuté, je ne comprends pas puisque j'active bien le classeur toto_2015 et que logiquement le programme devrait continuer dans ce classeur quoi qu'il arrive
Je joins le classeur, avez-vous une explication ?
merci d'avance
J'ai des difficultés concernant ce programme VBA joint
C'est un simple test sur un enregistrer sous et une fermeture
Code:
Sub truc()
ActiveWorkbook.Save
ActiveWorkbook.SaveAs Filename:="D:\Jeux\toto_2016.xlsm"
Range("A2").Value = 10
Workbooks.Open Filename:="D:\Jeux\toto_2015.xlsm"
Workbooks("toto_2015.xlsm").Activate
Range("A5").Value = 15
Workbooks("toto_2016.xlsm").Close
MsgBox "ok"
End Sub
Rien ne plante seul le msgbox n'est pas exécuté, je ne comprends pas puisque j'active bien le classeur toto_2015 et que logiquement le programme devrait continuer dans ce classeur quoi qu'il arrive
Je joins le classeur, avez-vous une explication ?
merci d'avance