How to control a Shockwave Flash Control on a slide in PowerPoint (291876)

MORE INFORMATION

Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific requirements. Note The following macro examples work only in PowerPoint. Visual Basic for Applications macros are not supported by the Microsoft PowerPoint Viewer. For additional information, click the following article number to view the article in the Microsoft Knowledge Base: NOTE: Neither the PowerPoint Viewer nor the Macintosh versions of PowerPoint support the use of ActiveX controls. Only Microsoft PowerPoint 97 and later can use ActiveX controls.

To create the code samples, follow these steps:

1. On the Tools menu, point to Macro, and then click Visual Basic Editor.
2. On the Insert menu, click Module.
3. Type the following code samples in the module.

Start

The following subroutine starts the Flash animation:

Sub PlayShock()
   Slide#.ShockwaveFlash#.Play
End Sub
				

NOTE: Slide# is the slide where the Shockwave Flash control is located. ShockwaveFlash# is the name of the Shockwave Flash Control on the slide; replace this with the actual name of the control.

Stop

The following subroutine stops the animation:

Sub StopShock()
   Slide#.ShockwaveFlash#.StopPlay
End Sub
				

Rewind

The following subroutine rewinds the animation back to the beginning:

Sub RewindShock()
   Slide#.ShockwaveFlash#.Rewind
End Sub
				

Adding and Configuring an Action Button

Use the following steps to link the code to the action buttons of your choice.

1. To create the action button, follow these steps:
   1. On the Drawing toolbar, click AutoShapes, point to Action Buttons, and then click the Action Button: Custom button.
   2. Draw the action button on the slide.
2. In the Action Settings dialog box, click the Mouse Click tab.
3. Click Run Macro.
   
   NOTE: You must first create the above macros to have this option available.
4. In the list of macros, select the name of the macro you want to attach to the button.
5. Click OK.