The trusted location is on my Z drive. I'm getting an error in this function

Public Function VBSlideProj(mySlide As PowerPoint.Slide) As Boolean
Dim VBProj As VBIDE.VBProject
Dim VBComp As VBIDE.VBComponent

Set VBProj = mySlide.Parent.VBProject 'Error here

VBSlideProj = False
For Each VBComp In VBProj.VBComponents
If VBComp.Name = mySlide.Name Then
VBSlideProj = True
Exit Function
End If
Next VBComp

End Function


I'm actually opening some powerpoint presentations and am checking to see if
there is a VBComponent attached to each slide. If there is, I want to do
something different.

"Bob Phillips" wrote:

What exactly are you doing that needs trusted access? if you post that I can
try it here.

--
__________________________________
HTH

Bob

"Barb Reinhardt" wrote in message
...
I just set it's current location to be a trusted location and I'm still
getting the error. What next?

Thanks for your help.

Barb

"Bob Phillips" wrote:

Why not move it into a trusted location?

--
__________________________________
HTH

Bob

"Barb Reinhardt" wrote in
message
...
I've just migrated to a new laptop and Excel 2007 in the last 24 hours
and
am
unable to run a macro that worked in 2003 on 2007 (that's a newsflash,
huh?)
Anyway, I'm trying to programmatically access information about the
VBA
Project and when I get to this line

Set VBProj = mySlide.Parent.VBProject

I get an error that the project is not trusted. (OK, this is
PowerPoint,
but it's running out of Excel). I've changed the settings to trust
this
project and I still get the error. Is there something that our admins
need
to do so that I can run this? Do I need to trust this out of
PowerPoint?

Thanks,
Barb Reinhardt