break all transparency and shadow in a document

how to break all transparency and shadow in a document with macro?