I don't understand the requirement

When the shapes other than shape 14 are deleted you have a blank page other than two cells in column A with the word "January", which I presume are redundant.

Can you add a copy of the sheet showing what it should look like after the shape deletion macro?