how get the Hammer sound?

[Geoff Cox]

Hello,

The code below finds any EndShow buttons and causes the chord sound to
be played when the button appears.

How would I change the sound to say the "Hammer" sound which comes
with PowerPoint? (By hand you get it using effect options | effect |
sound etc.)

Thanks

Geoff

For Each oSh In oSl.Shapes
If oSh.Type = 1 Then
If oSh.AutoShapeType = 132 Then

With oSh.AnimationSettings
.Animate = True
.TextLevelEffect = ppAnimateByAllLevels
.SoundEffect.ImportFromFile "c:\a-temp1\chord.wav"
End With

End If
End If

Next oSh

 

[Geoff Cox]

.SoundEffect.ImportFromFile "C:\Program Files\Microsoft
Office\OFFICE11\MEDIA\hammer.wav

John,

I guess that is the obvious way - somehow thought there might be
another!

Thanks.

Geoff