Decrease magnification for printing

With a little spelunking, you can find how the environment is initially setup:

Cell[StyleData[All, "Printout"], Magnification->0.72]‌​

So, add that to your notebook's private stylesheet, and modify the magnification at will.