Macro to Change Facing Pages setup

How do I change the paper size of an Active document that has facing pages using macro/vba?