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
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.