Lancer une macro automatiquement a la fermeture d'excel

[Ilan]

Bonjour,

Pouvez vous m'indiquez la ligne de commande à insérer pour que ma macro s'execute automatiquement à la fermeture de mon doc excel!!
Indiquez moi aussi sa position dans les lignes de programme ou dois je insérer , la nouvelle ligne de commande???


Pouvez vous m'indiquer la ligne de commande qui permet de rendre invisible les modifs faiites par la macro en cours... (changement d'ecran etc... je ne veux pas que toutes mes fenêtres et modifications en cours apparaissent sur l'ecran lors de l'execution de la macro)


Merci beaucoup

Ilan

 

[schmail]

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 @+

 

[evelyne]

Application.ScreenUpdating = False
evelyne

 

[Ilan]

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

 

[@+Thierry]

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

 

[Ilan]

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