Playing a macro under Excel do not work

[AKarim]

Hi,<br>I've been trying this macro on excel<br>Sub Macro1()<br>'<br>' Macro1 Macro<br><br>&nbsp;&nbsp;&nbsp;&nbsp;ActiveSheet.Shapes(&quot;Oval 1&quot.Fill.ForeColor.SchemeColor = 13<br>&nbsp;&nbsp;&nbsp;&nbsp;MsgBox &quot;Invisible&quot;<br>&nbsp;&nbsp;&nbsp;&nbsp;ActiveSheet.Shapes(&quot;Oval 1&quot.Visible = False<br>&nbsp;&nbsp;&nbsp;&nbsp;MsgBox &quot;Visible&quot;<br>&nbsp;&nbsp;&nbsp;&nbsp;ActiveSheet.Shapes(&quot;Oval 1&quot.Visible = True<br>&nbsp;&nbsp;&nbsp;&nbsp;MsgBox &quot;Et TOC c'est magique HIHIHIHIHIHIHI !!!!!!!&quot;<br>&nbsp;&nbsp;&nbsp;&nbsp;ActiveSheet.Shapes(&quot;Oval 1&quot.Fill.ForeColor.SchemeColor = 56<br><br>End Sub<br>It works when I try it under VB Editor.<br>When I close vb and run it under excel the message boxes appears but the shape do not get/or not visible, and don't change color either !<br>Can someone tell me why ?<br>Thanxs

 

[Dreamboat]

Try going to <A HREF="

http://www.wopr.com"

TARGET="_new">

http://www.wopr.com</A>

in the VB/VBA forum or the Excel forum. Ask them why. I can't figure it out!!! <p> <br><a href=mailto: dreamboat@nni.com> dreamboat@nni.com</a><br><a href=

http://www.wedomanuals.com>

</a><br>