Set Print range to max that will fit on a page

Hi I have a fancy spread sheet that already has macros in it, would like to add some code at the end of one of my macros that holds the print range to the print area I already have, but it just changes the scaling "Adjust to ______% of normal size" variable. What happens is i have columns that the user can hide and unhide, the more columns they hide, the smaller the picture gets on the page because the scaling does not chnage from the maximum. I just want to say, ok hold the columns to fit on one page, but zoom in the max possible and still be on that one page. Note the rows do not matter, they can spill down to the next page. Is this something easy to do? Do you get what I am looking for? If my outside margins are .25 then I want it always to be zoomed to .25 margins no matter how many columns are hidden or unhidden.

Originally Posted by xladept

Here's an old routine that you may be able to adapt:

Please Login or Register  to view this content.

Cool, I will try this, but if I already have something working, can I just do the "fit to Pages wide" and "fit to pages tall" part of that code? I don't want do define a bunch of other settings I already have set up.