Can anybody help?

I have a number of custom properties thus.....

Does anybody know, using a VBA macro, how to delete ALL custom properties regardless of there name?

Many thanks in advance!

Darren