Delete List Of Custom Formats

When you right click on your mouse, and you select:

Format Cells...NumberCustom
You can see many formatting styles.
Some of them impossible to delete eg: "General" or "@"

But some others easy to delete one by one pressing the Delete button.

In my Workbook eg "#.##0,00 ;[Red]-#.##0,00 ;; @"

Is there any way of deletting all of then by vba.

I mean all the different custom formats that I am carrying from book to book, from job to job long time ago.

I would like to have just the ones excel gives us by default, not the rest.