Hi there,
2 questions in 1, regarding moving shapes around.
1. The simpler question is
within this macro how would you get the screen to show the movement of the
shape as it goes down the screen?
Sub MoveItInSlideShow()
For i = 1 To 100
With SlideShowWindows(1).Presentation.Slides(1).Shapes("Rule 1.01")
.IncrementTop 0.75
End With
Next i
End Sub
2. How could I invoke this macro by first moving another shape and then
clicking the left or right mouse button. In simple terms moving a funnel
sideways and then releasing a shape, and watch it fall to the floor.
(I actually want to have a slide to represent "Deming's Funnel Experiment"
if any of you know that)
many thanks in advance.
David M. Marcovitz - 27 Nov 2006 17:49 GMT
Is there a reason you want to do this with macros? If you are using
PowerPoint 2002 or above, this is much easier with normal animations
(using triggers).
If this procedure isn't showing the movement, you might want to add a
delay between each movement. I suspect that it is happening too fast too
see.
--David

Signature
David M. Marcovitz
Microsoft PowerPoint MVP
Director of Graduate Programs in Educational Technology
Loyola College in Maryland
Author of _Powerful PowerPoint for Educators_
http://www.PowerfulPowerPoint.com/
> Hi there,
>
[quoted text clipped - 25 lines]
>
> many thanks in advance.
K J Boland - 29 Nov 2006 07:24 GMT
thanks both.
Can you guide me as to where to see triggers ?
Many thanks
kim
> Is there a reason you want to do this with macros? If you are using
> PowerPoint 2002 or above, this is much easier with normal animations
[quoted text clipped - 35 lines]
>>
>> many thanks in advance.
Jean-Pierre FORESTIER - 29 Nov 2006 10:37 GMT
Double click on the animation. In the Effect windows, at the bottom, y'll
see the triggers possibilities
--
Jean-Pierre FORESTIER Microsoft MVP PowerPoint
Auteur de PowerPoint 2002 chez Micro Application
> thanks both.
>
[quoted text clipped - 51 lines]
> >>
> >> many thanks in advance.
John Wilson - 27 Nov 2006 19:01 GMT
To see the macro move the shape add a DoEvents after the End With
But as DM says this is much easier with motion paths and triggers

Signature
Did that answer the question / help?
___________________
John Wilson
Microsoft Certified Office Specialist
http://www.technologytrish.co.uk/ppttipshome.html
email john AT technologytrish.co.uk
> Hi there,
>
[quoted text clipped - 23 lines]
>
> many thanks in advance.