Thank you for your help, this works.

I have changed according to your suggestion in the Workbook_Open and I do not use the Workbook_Close.

Once more thank you and have a nice weekend
EEL1966