Update Method Example
This example updates the link to OLE object one on Sheet1.
Worksheets("Sheet1").OLEObjects(1).Update