OutlookBarShortcuts.Add 方法 (Outlook)
将新的快捷方式添加到 快捷方式窗格中的组。
语法
表达式。添加 (目标、 名称、 索引)
表达 一个代表 OutlookBarShortcuts 对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| Target | 必需 | Variant | 要创建的快捷方式的目标。 |
| Name | 必需 | String | 要创建的快捷方式的名称。 |
| Index | 可选 | Long | 在“快捷方式”窗格组中插入新 快捷方式 的位置。 位置 1 位于组的顶部。 目标 类型取决于快捷方式类型。 如果类型为 Folder，则快捷方式表示 Microsoft Outlook 文件夹。 如果类型为 String，则快捷方式表示文件系统路径或 URL。 |
返回值
一个代表新快捷方式的 OutlookBarShortcut 对象。
示例
下面的 Microsoft Visual Basic for Applications 示例添加网站上的 Microsoft 主页的快捷方式。
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
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。