Shape.OLEFormat property (Publisher)
Returns an OLEFormat object that contains OLE formatting properties for the specified shape. Applies to Shape or ShapeRange objects that represent OLE objects.
expression.OLEFormat
expression A variable that represents a Shape object.
This example loops through all the shapes on the first page of the active document and automatically updates all linked Excel worksheets.
Sub UpdateLinkedExcelSpreadsheets()
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 shp
End Sub
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.