A Microsoft Office (Excel, Word) forum. OfficeFrustration

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » OfficeFrustration forum » Microsoft Powerpoint, Publisher and Visio » Powerpoint
Site Map Home Register Authors List Search Today's Posts Mark Forums Read  

parameter not action to run a named macro



 
 
Thread Tools Display Modes
  #1  
Old May 17th, 2010, 10:02 AM posted to microsoft.public.powerpoint
a1k1do via OfficeKB.com
external usenet poster
 
Posts: 16
Default parameter not action to run a named macro

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("ShockwaveFlas h").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.a...point/201005/1

  #2  
Old May 17th, 2010, 04:41 PM posted to microsoft.public.powerpoint
Shyam Pillai
external usenet poster
 
Posts: 622
Default parameter not action to run a named macro

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@uwe wrote in message
news:a8219ee8e69e9@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("ShockwaveFlas h").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.a...point/201005/1

  #3  
Old May 17th, 2010, 07:13 PM posted to microsoft.public.powerpoint
a1k1do via OfficeKB.com
external usenet poster
 
Posts: 16
Default parameter not action to run a named macro

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.a...point/201005/1

 




Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Forum Jump


All times are GMT +1. The time now is 10:38 AM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 OfficeFrustration.
The comments are property of their posters.