VBA to wipe an entire workbook on date

[Herpe_derp]

Hello

New to this forum.

Due to the legal need to delete data after 6 years, I need VBA code to do the following:

- on X date
- wipe all data from workbook, including all the sheets
- delete version history (so it can’t be recovered)
- if possible, replace with a message “data deleted - retention period exceeded”.

If not possible to delete version history so it’s unrecoverable, some VBA code which:

- on x date
- converts all data on all sheets into something unreadable, just random data or something like “broanfjsoieiutjwnxk”

The second way, if a version history is recovered, the VBA will just do the same over and over as it’s based on x date.

The reason I need it to do the above is because we need the file name to remain in the folder as a record.

Hope I’ve explained ok?

 

[Micron]

Why not just over-write the files with a blank template? Or save the filenames as values in a workbook and delete the original file?

 

[Herpe_derp]

Why not just over-write the files with a blank template? Or save the filenames as values in a workbook and delete the original file?

If only it were than simple

I’d have done it

 

[Micron]

Well, I wish you luck as you wait for further responses because for me, that answer sheds no light on why the suggestion wouldn't solve the issue. Seems to me that if you replace a file with a blank template, you don't have to worry about version history.

 

[Herpe_derp]

Well, I wish you luck as you wait for further responses because for me, that answer sheds no light on why the suggestion wouldn't solve the issue. Seems to me that if you replace a file with a blank template, you don't have to worry about version history.

Basically, we create about three sometimes up to ten per day, so over the space of 6 years, that’s a lot to sit through.

For data retention, it would be easier to set a time bomb on each sheet