Nouveau nom de fichier dans macro
Bonjour
J'ai crée une macro qui exporte un onglet de mon classeur dans un nouveau classeur. Ensuite, la meme macro me fait revenir dans le classeur initial.
Mon problème vient du fait que le classeur initial peut changer de nom et par conséquent, la macro ne reconnait plus le classeur à activer.
Je vous met ci-dessous le code de ma macro :
Sub FACTUREMAC()
'
' FACTUREMAC Macro
'
'
Sheets("PARAMETRES DE FACTURATION").Select
Sheets("FACTURE").Visible = True
Sheets("FACTURE").Select
Sheets("FACTURE").Copy
Windows.Arrange ArrangeStyle:=xlVertical
Windows("Excellence Chiffrage v.1.4 PC Vs MAC.xlsm").Activate
Sheets("FACTURE").Select
ActiveWindow.SelectedSheets.Visible = False
Sheets("PARAMETRES DE FACTURATION").Select
End Sub
Il s'agit de ce qui est ecrit en rouge ("Excellence Chiffrage v1.4 PC Vs MAC") qui change de nom à chaque fois, donc ma macro me signal un bug car il ne retrouve plus ce classeur
Merci de votre aide..
Bonsoir
Remplaces ta ligne par
ThisWorkbook.ActivateMerci Beaucoup cela fonctionne ... c'etati si simple ... lol
Merci encore