Hi Expert,
thank you so much for your help, it solve my 90% of problem,
but actually i have aprox 60 charts in my dashboard. so for this is there
any comman macro, otherwise i have to write 60 macro, to assing each macro
to every chart.
Pls help
Regards
Pankaj k Pandey
On Tue, Aug 31, 2010 at 3:13 PM, STDEV(i) <[email protected]> wrote:
> ---------- Forwarded message ----------
> From: siti Vi <[email protected]>
> Date: Tue, Aug 31, 2010 at 4:24 PM
> Subject: Re: $$Excel-Macros$$ [email protected]
> To: [email protected]
>
>
> Sub ZoomChart1()
> Static zoomIn As Boolean
> ActiveSheet.ChartObjects("Chart 1").Activate
> ActiveChart.ChartArea.Select
>
> With ActiveSheet.Shapes("Chart 1")
> If zoomIn Then
> .ScaleWidth 0.5, msoFalse, msoScaleFromTopLeft
> .ScaleHeight 0.5, msoFalse, msoScaleFromTopLeft
> zoomIn = False
> Else
> .ScaleWidth 2, msoFalse, msoScaleFromTopLeft
> .ScaleHeight 2, msoFalse, msoScaleFromTopLeft
> zoomIn = True
> End If
> End With
> ActiveSheet.Range("A1").Activate
> End Sub
>
>
> On Tue, Aug 31, 2010 at 11:23 AM, Intelligent But Crazy
> <[email protected]> wrote:
> > Hi Group,
> > I need your expertise in one of my advance Excel Dashboard.
> in
> > sample Excel sheet there are Two Excel Chart, I required when my mouse
> > courser got focus on chart 1 so it's show in zoom. and when my mouse
> > courser lost focus from chart 1 so its show in normal form. same happen
> with
> > chart 2.
> >
> > Please help me out with this query, & kindly treat it as urgent basis.
> >
> > Thanks in advance,
> > --
> > Pankaj Pandey
> > Bhopal
>
--
Pankaj Pandey
Bhopal
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to [email protected]
<><><><><><><><><><><><><><><><><><><><><><>
HELP US GROW !!
We reach over 7000 subscribers worldwide and receive many nice notes about the
learning and support from the group.Let friends and co-workers know they can
subscribe to group at http://groups.google.com/group/excel-macros/subscribe
