Workbook.LinkSources (Excel)

Retorna uma matriz de vínculos da pasta de trabalho. Os nomes na matriz são os nomes dos documentos, edições ou servidores DDE ou OLE vinculados. Retorna Empty se não houverem links.

O formato da matriz é uma matriz unidimensional para todos os tipos, exceto editores e Assinante. As sequências de caracteres retornadas contêm o nome da origem do vínculo, na notação apropriada ao tipo de vínculo. Por exemplo, os vínculos DDE usam a sintaxe "Servidor|Documento!Item". Para vínculos de editora e assinante, a matriz retornada é bidimensional. A primeira coluna da matriz contém os nomes da edição, e a segunda coluna contém as referências das edições na forma de texto.

LinkSources (Type)

Type: Uma das constantes de XlLink, que especifica o tipo de link a ser retornado.

aLinks = ActiveWorkbook.LinkSources(xlOLELinks) 
If Not IsEmpty(aLinks) Then 
 For i = 1 To UBound(aLinks) 
 MsgBox "Link " & i & ":" & Chr(13) & aLinks(i) 
 Next i 
End If