This example updates any shapes in the active document that are linked OLE objects if Word isn't set to update links automatically.
For Each s In ActiveDocument.Shapes
If s.Type = msoLinkedOLEObject Then
If s.LinkFormat.AutoUpdate = False Then s.LinkFormat.Update
End If
Next s
This example updates any fields in the active document that aren't updated automatically.
For Each afield In ActiveDocument.Fields
If afield.LinkFormat.AutoUpdate = False Then _
afield.LinkFormat.Update
Next afield