[RESOLVED] VBA Code not working in VB6

[Beall49]

I was building something to run an update in PPT to refresh the links. I am now having to update some related things in access along with some pivot tables in Excel. So I decided to just build it in VB6. However, my powepoint code does not work, I have added the powerpoint libraries into VB, but it fails everytime. I open the ppt but when it gets to checking the shape.type it fails....any idea?

  Dim osld As Slide
    Dim oshp As Shape
    For Each osld In ActivePresentation.Slides
        For Each oshp In osld.Shapes
            If oshp.Type = msoLinkedOLEObject Then 'Fails Here on oshp.Type
                oshp.LinkFormat.Update
               End If
            Next oshp
        Next osld

EDIT:This code is straight out of PPT so the ActivePresentation thing obviously needs to be changed, I accidently deleted the updates I made in vb6


EDIT: The error it gives me is a compile error: Method or data member not found, which sounds like a reference but I cant find anymore references that I should need.