OLEFormat Property
Returns an OLEFormat object that represents the OLE characteristics (other than linking) for the specified shape, inline shape, or field. Read-only.
Example
This example loops through all the floating shapes on the active document and sets all linked Microsoft Excel worksheets to be updated automatically.
For Each s In ActiveDocument.Shapes
If s.Type = msoLinkedOLEObject Then
If s.OLEFormat.ProgID = "Excel.Sheet" Then
s.LinkFormat.AutoUpdate = True
End If
End If
Next