Método SharedWorkspaceLinks.Add (Office)

Artigo
04/07/2023

Adiciona um link à lista de links em um espaço de trabalho compartilhado.

Observação

A partir do Microsoft Office 2010, este objeto ou membro foi preterido e não deve ser usado.

Sintaxe

expressão. Adicionar (URL, Descrição, Anotações)

expressão Obrigatório. Uma variável que representa um objeto SharedWorkspaceLinks.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
URL	Obrigatório	String	O endereço do site ao qual um link está sendo adicionado.
Descrição	Opcional	String	Descrição do link.
Notes	Opcional	String	Observações sobre o link.

Valor de retorno

SharedWorkspaceLink

Exemplo

Este exemplo adiciona um novo link à coleção de links do espaço de trabalho compartilhado.

    Dim swsLink As Office.SharedWorkspaceLink 
    Set swsLink = ActiveWorkbook.SharedWorkspace.Links.Add( _ 
        "https://msdn.microsoft.com", _ 
        "Microsoft Developer Network Home Page", _ 
        "My favorite developer site!") 
    MsgBox "New link: " & swsLink.Description, _ 
        vbInformation + vbOKOnly, _ 
        "New Link in Shared Workspace" 
    Set swsLink = Nothing

Confira também

Membros do objeto SharedWorkspaceLinks

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.

Compartilhar via