zoom to a range of cells.

[Dave B]

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

 

[Ron de Bruin]

Try this

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


--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2002 SP-2)

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?

 

[Dave B]

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

Dave