My suggestion was to temporarily remove it and then put it back, via code.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Digital2k" <digital2k@adelphia.net> wrote in message
news:geudnUZ2B5ErTjbZnZ2dnUVZ_vGdnZ2d@adelphia.com...
> I thought excel can do almost anything. I'm sure there must be a way to
have
> my spreadsheet locked and have the ability to play a file. I have a
picture
> as the object linked to the macro to play the file and it is unprotected.
> This is the error: Method 'Select' of object 'Shape' failed.
> Can anyone help?
> Thanks,
> Digital2k
>
> "Bob Phillips" <bob.NGs@somewhere.com> wrote in message
> news:e619LEEoGHA.1332@TK2MSFTNGP05.phx.gbl...
> > Just take protection off
> >
> > Play Macro
> >
> > Activesheet.Unprotect
> > ActiveSheet.Shapes("Object 100").Select
> > Selection.Verb Verb:=xlPrimary
> > Range("B8").Select
> > Activesheet.Protect
> > End Sub
> >
> >
> > --
> > HTH
> >
> > Bob Phillips
> >
> > (replace somewhere in email address with gmail if mailing direct)
> >
> > "Digital2k" <digital2k@adelphia.net> wrote in message
> > news:N8mdnSAEOK4WVjbZnZ2dnUVZ_oGdnZ2d@adelphia.com...
> >> Hello Group,
> >>
> >> I have a excel spreadsheet (2003) that has a wave file. I created a
macro
> > to
> >> play the file.
> >> I want to Protect the sheet. When I play the file when the sheet is
lock
> >> I
> >> get a Run-time error.
> >> This is the macro:
> >>
> >> Play Macro
> >>
> >> ActiveSheet.Shapes("Object 100").Select
> >> Selection.Verb Verb:=xlPrimary
> >> Range("B8").Select
> >> End Sub
> >>
> >> When I select debug this is the line that is highlighted:
> >> ActiveSheet.Shapes("Object 100").Select
> >>
> >> Any help on this matter is appreciated.
> >> Digital2k
> >>
> >>
> >
> >
>
>