I found this macro that will zoom a picture; the problem is it never returns to the original size. Can this or a different macro zoom a picture, and then return the image to the original size after you click off? Or zoom if you hover over an image. I also may have the sheet protected, will it still work then? Thanks for any advice.
<?xml:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" /><o></o>
Code:
[/FONT][/COLOR]
[COLOR=black][FONT=Verdana]Sub Picture_Click()
Set Shp = ActiveSheet.Shapes(Application.Caller)
Shp.Select
ActiveWindow.Zoom = 75
End Sub[/FONT][/COLOR]
[COLOR=black][FONT=Verdana]