Método OutlookBarShortcuts.Add (Outlook)

Adiciona um novo atalho a um grupo no painel atalhos.

Sintaxe

expressão. Adicionar (Destino, Nome, Índice)

Expressão Uma variável que representa um objeto OutlookBarShortcuts .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Target	Obrigatório	Variant	O destino do atalho que está sendo criado.
Name	Obrigatório	String	O nome do atalho que está sendo criado.
Index	Opcional	Long	A posição na qual o novo atalho será inserido no grupo de atalhos . A posição um está na parte superior do grupo. O tipo De destino depende do tipo de atalho. Se o tipo for Pasta, o atalho representará uma pasta do Microsoft Outlook. Se o tipo for uma Cadeia de Caracteres, o atalho representará um caminho do sistema de arquivos ou uma URL.

Valor de retorno

Um objeto OutlookBarShortcut que representa o novo atalho.

Exemplo

O exemplo a seguir do Microsoft Visual Basic for Applications adiciona um atalho à home page da Microsoft na Web.

Sub AddShortcut() 
 Dim myOlBar As Outlook.OutlookBarPane 
 Dim myolGroup As Outlook.OutlookBarGroup 
 Dim myOlShortcuts As Outlook.OutlookBarShortcuts 
 
 Set myOlBar = Application.ActiveExplorer.panes.Item("OutlookBar") 
 Set myolGroup = myOlBar.Contents.Groups.Item(1) 
 Set myOlShortcuts = myolGroup.Shortcuts 
 myOlShortcuts.Add "https://www.microsoft.com", _ 
 "Microsoft Home Page", 1 
End Sub

Confira também

Objeto OutlookBarShortcuts

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.