I want to assign a macro to an autoshape that zooms to a desired range of cells in the same workbook, on the same sheet, and adjusts the zoom automatically, filling my available screen size with the desired cell range. Can this be done

Try this

Range("b3:g10").Select
ActiveWindow.Zoom = True


--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2002 SP-2)
www.rondebruin.nl



"Dave B" wrote in message ...
I want to assign a macro to an autoshape that zooms to a desired range of cells in the same workbook, on the same sheet, and
adjusts the zoom automatically, filling my available screen size with the desired cell range. Can this be done?

With a little variation, I was able to get your tip to do exactly what I needed. Thanks a lot

Dave