Objeto SharedWorkspaceLinks (Office)
Uma coleção dos objetos SharedWorkspaceLink no espaço de trabalho compartilhado atual.
Observação
A partir do Microsoft Office 2010, este objeto ou membro foi preterido e não deve ser usado.
Exemplo
Use a propriedade Links do objeto SharedWorkspace para retornar uma coleção SharedWorkspaceLinks.
Dim swsLinks As Office.SharedWorkspaceLinks
Set swsLinks = ActiveWorkbook.SharedWorkspace.Links
MsgBox "There are " & swsLinks.Count & _
" link(s) in the current shared workspace.", _
vbInformation + vbOKOnly, _
"Collection Information"
Set swsLinks = Nothing
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.