Share via

ProgId Property [Publisher 2003 VBA Language Reference]

  • Article

Returns a String that represents the programmatic identifier (ProgID) for the specified OLE object. Read-only.

expression.ProgId

expression Required. An expression that returns one of the objects in the Applies To list.

Example

This example loops through all the linked OLE object shapes on the first page of the active document and updates all linked Excel worksheets. This example assumes there is at least one shape on the first page of the active publication.

Sub UpdateLinkedOLEObject()
    Dim shp As Shape
    For Each shp In ActiveDocument.Pages(1).Shapes
        If shp.Type = msoLinkedOLEObject Then
            If shp.OLEFormat.ProgId = "Excel.Sheet" Then
                shp.LinkFormat.Update
            End If
        End If
    Next
End Sub

Applies to | OLEFormat Object