Prev: how to make leaflets in powerpoint?
Next: PowerPoint 2003 problems
From: a1k1do via OfficeKB.com on 17 May 2010 05:02
Hello

I'm trying to trap an event or command to then run a named macro "i'm finding
it a little like trying to chop wood on my face"

here is what I've tried

Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args As
String)
With SlideShowWindows(1).View
If command = "somthing" Then ' or try
' if (command) = "somthing" then
.run "amacro"
End If
End Sub

With SlideShowWindows(1).View
Dim obj As ShockwaveFlash
Set obj = ActivePresentation.Slides(1).Shapes("ShockwaveFlash").OLEFormat.
Object
If command = "somthing" Then ' or try
' if (command) = "somthing" then
obj.run "amacro"
End If
End Sub

i think i'm missing somthing obvious!

Thanks

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

From: Shyam Pillai on 17 May 2010 11:41
There isn't a Run method associated with View.

To execute a macro use:

Call <MacroName>

or

Application.Run "macroname"

--
Regards,
Shyam Pillai

Handout Wizard: http://skp.mvps.org/how.
PowerPoint 2010 (32-bit/64-bit) versions supported.

"a1k1do via OfficeKB.com" <u59720(a)uwe> wrote in message
news:a8219ee8e69e9(a)uwe...
> Hello
>
> I'm trying to trap an event or command to then run a named macro "i'm
> finding
> it a little like trying to chop wood on my face"
>
> here is what I've tried
>
> Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args
> As
> String)
> With SlideShowWindows(1).View
> If command = "somthing" Then ' or try
> ' if (command) = "somthing" then
> .run "amacro"
> End If
> End Sub
>
> With SlideShowWindows(1).View
> Dim obj As ShockwaveFlash
> Set obj = ActivePresentation.Slides(1).Shapes("ShockwaveFlash").OLEFormat.
> Object
> If command = "somthing" Then ' or try
> ' if (command) = "somthing" then
> obj.run "amacro"
> End If
> End Sub
>
> i think i'm missing somthing obvious!
>
> Thanks
>
> --
> Message posted via OfficeKB.com
> http://www.officekb.com/Uwe/Forums.aspx/powerpoint/201005/1
>
From: a1k1do via OfficeKB.com on 17 May 2010 14:13
I feel very foolish, thank -you for answering. All working super. Than-you.

Shyam Pillai wrote:
>There isn't a Run method associated with View.
>
>To execute a macro use:
>
>Call <MacroName>
>
>or
>
>Application.Run "macroname"
>
>> Hello
>>
>[quoted text clipped - 27 lines]
>>
>> Thanks

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

 | 
Pages: 1
Prev: how to make leaflets in powerpoint?
Next: PowerPoint 2003 problems