[Powerpoint] OLE Verknüpfungen aktualisieren per VBA

[ZodiacXP]

Hoi.

Ich habe den Objektkatalog bemüht und mir folgendes zusammengeschustert:

Private Sub CommandButton1_Click()
    Dim sld As Slide, sh As Shape, o As Object
    For Each sld In ActivePresentation.Slides
        For Each sh In sld.Shapes
            If sh.Type = msoLinkedOLEObject Then
                sh.Chart.refresh
            End If
        Next
    Next
End Sub

Nun sagt er mir es gäbe einen Syntaxfehler bei "sh.Chart.refresh". Sehe aber keinen, da er auch über "sh.Chart.Refresh()" meckert.
Es soll eine eingebundene Excel Tabelle aktualisiert werden.
Wie stelle ich das an, bzw wo ist der Fehler?