Prev: PowerPoint Placeholder - HELP!
Next: More than one or multiple notes pages (not using hide slide)
From: a1k1do via OfficeKB.com on 9 May 2010 04:07
Hi I have a shockwave flash object embedded on a slide, it has a simple
FSCommand sub. I can use this macro to copy the afore mentioned shockwave
object to all sides but the associated FScommand sub which I can see in the
object tree on slide1, does not get transposed to the other slides. Doers
anyone know if this is beyond a macro to perform this type of function?

Sub flashbutton())

Dim oSh as Shape
Dim x as Long

Set oSh=ActiveWindow.Selection.ShapeRange(1)
oSh.Copy

For x = 2 to ActivePresentation.Slides.Count
ActivePresentation.Slides(x).Shapes.Paste
Next

End Sub

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.aspx/powerpoint/201005/1

From: Steve Rindsberg on 9 May 2010 11:17
In article <a7bc8eb951de7(a)uwe>, A1k1do via OfficeKB.com wrote:
> Hi I have a shockwave flash object embedded on a slide, it has a simple
> FSCommand sub.

What is an FSCommand sub?

> I can use this macro to copy the afore mentioned shockwave
> object to all sides but the associated FScommand sub which I can see in the
> object tree on slide1, does not get transposed to the other slides. Doers
> anyone know if this is beyond a macro to perform this type of function?
>
> Sub flashbutton())
>
> Dim oSh as Shape
> Dim x as Long
>
> Set oSh=ActiveWindow.Selection.ShapeRange(1)
> oSh.Copy
>
> For x = 2 to ActivePresentation.Slides.Count
> ActivePresentation.Slides(x).Shapes.Paste
> Next
>
> End Sub


==============================
PPT Frequently Asked Questions
http://www.pptfaq.com/

PPTools add-ins for PowerPoint
http://www.pptools.com/


From: a1k1do via OfficeKB.com on 9 May 2010 11:33
Hi Steve

its

Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args As
String)
With SlideShowWindows(1).View
.GotoSlide (1)
End With
End Sub

Its just a simple flash button that I'm trying to copy to all 50 slides.

I can do it one by one but was hoping to automate the task so I could use in
the future.

Thanks

Steve Rindsberg wrote:
>> Hi I have a shockwave flash object embedded on a slide, it has a simple
>> FSCommand sub.
>
>What is an FSCommand sub?
>
>> I can use this macro to copy the afore mentioned shockwave
>> object to all sides but the associated FScommand sub which I can see in the
>[quoted text clipped - 14 lines]
>>
>> End Sub
>
>==============================
>PPT Frequently Asked Questions
>http://www.pptfaq.com/
>
>PPTools add-ins for PowerPoint
>http://www.pptools.com/

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.aspx/powerpoint/201005/1

From: Steve Rindsberg on 9 May 2010 23:18
In article <a7c071c0b47ed(a)uwe>, A1k1do via OfficeKB.com wrote:
> Hi Steve
>
> its
>
> Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args As
> String)
> With SlideShowWindows(1).View
> .GotoSlide (1)
> End With
> End Sub
>
> Its just a simple flash button that I'm trying to copy to all 50 slides.
>
> I can do it one by one but was hoping to automate the task so I could use in
> the future.

Is this a routine that clicking a button within the flash calls in VBA or ???




>
> Thanks
>
> Steve Rindsberg wrote:
> >> Hi I have a shockwave flash object embedded on a slide, it has a simple
> >> FSCommand sub.
> >
> >What is an FSCommand sub?
> >
> >> I can use this macro to copy the afore mentioned shockwave
> >> object to all sides but the associated FScommand sub which I can see in the
> >[quoted text clipped - 14 lines]
> >>
> >> End Sub
> >
> >==============================
> >PPT Frequently Asked Questions
> >http://www.pptfaq.com/
> >
> >PPTools add-ins for PowerPoint
> >http://www.pptools.com/


==============================
PPT Frequently Asked Questions
http://www.pptfaq.com/

PPTools add-ins for PowerPoint
http://www.pptools.com/


From: a1k1do via OfficeKB.com on 10 May 2010 03:45
Steve Rindsberg wrote:
>> Hi Steve
>>
>[quoted text clipped - 11 lines]
>> I can do it one by one but was hoping to automate the task so I could use in
>> the future.
>
>Is this a routine that clicking a button within the flash calls in VBA or ???
>
>> Thanks
>>
>[quoted text clipped - 15 lines]
>> >PPTools add-ins for PowerPoint
>> >http://www.pptools.com/
>
>==============================
>PPT Frequently Asked Questions
>http://www.pptfaq.com/
>
>PPTools add-ins for PowerPoint
>http://www.pptools.com/


Steve, thanks
I hope I can convey this in a suitable way, i know actionscript but my
understanding of VBA/Macro's is lacking. Thanks to www. pptfaq.com i am
learning.
This will be colloquial:
The flash/shockwave is embedded in a slide “ lets say slide 10”, then i
(right click) the shockwave object on slide and select “view code”. I add
the following code:
Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args As
String)
With SlideShowWindows(1).View
.GotoSlide (1)
End With
End Sub
In the Object browser i can see a Micosoft Powerpoint Object but there is no
module, I have not added this as a macro.
I run in show mode press the flash object and it will take me to slide 1 in
this case.
I don't think I can trap a fscommand and invoke a macro! I maybe wrong.
I'm trying to then write some form of macro or script that would copy the
shockwave object to all other slides. I can do that no problem but the
associated script that needs to reside on each slide is sadly missing.
Kind Regards

--
Message posted via http://www.officekb.com

 |  Next  |  Last
Pages: 1 2 3
Prev: PowerPoint Placeholder - HELP!
Next: More than one or multiple notes pages (not using hide slide)