Gebruik de gebeurtenis Workbook_Open:
Privé SubWorkbook_Open ()
Als nu > dateserial (2010, 8, 27) Dan destruct_macro
Sub van het eind