Compartilhar via


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.