Excel.Workbook.OpenLinks.md

title	keywords	f1_keywords	api_name	ms.assetid	ms.date	ms.localizationpriority
Workbook.OpenLinks method (Excel)	vbaxl10.chm199120	vbaxl10.chm199120	Excel.Workbook.OpenLinks	cae33bab-892e-0861-e4ec-8a334097e0d1	05/29/2019	medium

Workbook.OpenLinks method (Excel)

Opens the supporting documents for a link or links.

Syntax

expression.OpenLinks (Name, ReadOnly, Type)

expression A variable that represents a Workbook object.

Parameters

Name	Required/Optional	Data type	Description
Name	Required	String	The name of the Microsoft Excel or DDE/OLE link, as returned from the LinkSources method.
ReadOnly	Optional	Variant	True to open documents as read-only. The default value is False.
Type	Optional	Variant	One of the constants of XlLink that specifies the link type.

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.

Sub OpenAllLinks() 
 Dim arLinks As Variant 
 Dim intIndex As Integer 
 arLinks = ActiveWorkbook.LinkSources(xlExcelLinks) 
 
 If Not IsEmpty(arLinks) Then 
 For intIndex = LBound(arLinks) To UBound(arLinks) 
 ActiveWorkbook.OpenLinks arLinks(intIndex) 
 Next intIndex 
 Else 
 MsgBox "The active workbook contains no external links." 
 End If 
End Sub

[!includeSupport and feedback]