Lancer une macro automatiquement a la fermeture d'excel

Salut Ilan

Tu dois mettre ta Macro dans "ThisWorkBook"
Private Sub Workbook_BeforeClose(Cancel As Boolean)

Pour le reste de ta question il te faudra attendre l'intervention d'un spécialiste du forum @+

Application.ScreenUpdating = False
evelyne

Voici ma macro et je n'arrive pas a placer la ligne de commande de "schmail"

Aidez moi!!!!! Please



Sub PLVOS2()

ActiveWorkbook.Save
With ActiveWorkbook
.HighlightChangesOptions When:=xlAllChanges, Who:="Administrator"
.ListChangesOnNewSheet = True
.HighlightChangesOnScreen = False
End With
Sheets("historique").Select
Range("A2:K65533").Select
Selection.Copy
Workbooks.Open Filename:= _
"U:\COMLOG\2003\Suivi des modifications\Historique PLV 2003"
Sheets("Changements PLV OS2").Select
Range("A3").Select
ActiveSheet.Paste
Selection.Replace What:="<vide>", Replacement:="0", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub

Salut Ilan, Schmail, Evelyne et le Forum


Ce que tu sembles ne pas avoir compris c'est que ce n'est pas dans un Module Standard qu'il faut ce code...

Par l'explorateur de projet, sous VBE, tu as aussi des Privates Modules... Un pour chaque Feuille et Une pour le Classeur ("ThisWorkBook")... C'est là que Schmail te conseillait à juste titre d'utiliser la macro évènementielle :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
PLVOS2
End Sub

(En mettant ceci tel quel, ta macro "PLVOS2" sera lancée auto à la fermeture...)

Bon Aprèm
@+Thierry

merci bcp thierry pour cet aide!!!!

Je remercie aussi Schmail et Evelyne pour leur participation à la résolution de mes pb sous Excel!!!

Cordialement,

Ilan