In 2000/2003 I could :
SendKeys "%(FUA)" + Format(ActiveSheet.PageSetup.Zoom) + "~", True

OK I figured out that they changed the way sendkeys works. In prior
versions if you wanted to do multiple ALT keys without releasing ALT,
you put them in () but in 2007 you don't need to do that so I can
Sendkeys "%PSP%A" + Format(ActiveSheet.PageSetup.Zoom) + "~", True

This is still not a good solution.

I really need to know what is called to process the change from the
page setup so I can call it after changing the zoom