Have you tried simply changing the drawing scale - I don't see why you would need a Macro to do this.