Compartir a través de


Método OutlookBarShortcuts.Add (Outlook)

Agrega un nuevo acceso directo a un grupo en el panel de accesos directos.

Sintaxis

expresión. Agregar (destino, nombre, índice)

Expresión Variable que representa un objeto OutlookBarShortcuts .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Target Obligatorio Variant Destino del acceso directo que se va a crear.
Name Obligatorio String Nombre del acceso directo que se va a crear.
Index Opcional Long Posición en la que se insertará el nuevo acceso directo en el grupo de paneles Accesos directos . La posición uno está en la parte superior del grupo. El tipo de destino depende del tipo de acceso directo. Si el tipo es Carpeta, el acceso directo representa una carpeta de Microsoft Outlook. Si el tipo es string, el acceso directo representa una ruta de acceso del sistema de archivos o una dirección URL.

Valor devuelto

Objeto OutlookBarShortcut que representa el nuevo acceso directo.

Ejemplo:

En el ejemplo siguiente de Microsoft Visual Basic para Aplicaciones, se agrega un acceso directo a la página principal de Microsoft en la 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

Consulte también

Objeto OutlookBarShortcuts

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.