Bonjour à tous,
Voici mon problème :
A l'ouverture d'un fichier 'Kit.xlsm", sa macro Sub Autpen() ouvre un fichier "Info.xlsm" situé dans le même répertoire :
Sub Autpen()
W_Ret = ActiveWorkbook.Name
ChDir ThisWorkbook.Path
Workbooks.Open Filename:="Info.xlsm"
Windows(W_Ret).Activate
End Sub
Quand je ferme le fichier "Kit.xlsm"
La macro Sub Auto_Close() de ce fichier ferme bien le fichier Info.xlsm (Forcé sans Sauvegarde) :
Sub Auto_Close()
Windows("Info.xlsm").Activate
Application.DisplayAlerts = False
ActiveWindow.Close
Application.DisplayAlerts = True
End Sub
MAIS une fenêtre Excel reste ouverte à la fermeture !!!!
Si vous pouvez m'aider….Merci d'avance
Voici mon problème :
A l'ouverture d'un fichier 'Kit.xlsm", sa macro Sub Autpen() ouvre un fichier "Info.xlsm" situé dans le même répertoire :
Sub Autpen()
W_Ret = ActiveWorkbook.Name
ChDir ThisWorkbook.Path
Workbooks.Open Filename:="Info.xlsm"
Windows(W_Ret).Activate
End Sub
Quand je ferme le fichier "Kit.xlsm"
La macro Sub Auto_Close() de ce fichier ferme bien le fichier Info.xlsm (Forcé sans Sauvegarde) :
Sub Auto_Close()
Windows("Info.xlsm").Activate
Application.DisplayAlerts = False
ActiveWindow.Close
Application.DisplayAlerts = True
End Sub
MAIS une fenêtre Excel reste ouverte à la fermeture !!!!
Si vous pouvez m'aider….Merci d'avance