there is no need to select all the shapes. Macro deletes one selected shape and removes its color from the palette, if there are no more objects with the same color in current document.
if you want to delete several objects of different colors and remove their colors from the palette, then the macro needs to be slightly modified
|