OpenLinks Method Example

This example opens OLE link one in the active workbook.

linkArray = ActiveWorkbook.LinkSources(xlOLELinks)
ActiveWorkbook.OpenLinks linkArray(1)

This example opens all supporting Microsoft Excel documents for the active workbook.

ActiveWorkbook.OpenLinks _
    name:=ActiveWorkbook.LinkSources(xlExcelLinks)