通过 VBA 在 Outlook 2007 中导出自定义菜单

通过 VBA 在 Outlook 2007 中导出自定义菜单

我目前正在使用Microsoft Outlook 2003MS Outlook 2013,并且想升级到它。

我做了一些修改哪些东西对我的工作很重要,我想知道让他们融入新环境的最简单方法是什么Outlook 2013

  • 自定义视图 - 我正在使用电子邮件和日历中的自定义视图(主要是表格)
  • 自定义菜单 - 我在菜单栏中创建了 2 个附加菜单,让我可以直接启动 makros(也可以使用键盘快捷键)
  • 搜索文件夹 - 我正在使用一些使用自定义视图的自定义搜索文件夹,并创建了一些上面提到的 VBA 宏,以便使用某些键盘快捷键直接跳转到这些视图

答案1

这只是部分答案,但如果可能的话我会扩展它

通过 VBA 在 Outlook 2007 中导出自定义菜单

我制作了自定义菜单的屏幕截图来记录 Office 2007 中的现状。
使用以下 VBA 代码,至少可以导出每个菜单项的名称和使用的宏过程(将它们打印到 VBA 中的输出窗口),这为我节省了大量的点击和复制时间:

备注:您必须输入自定义菜单的名称,在下面描述的示例中,它被称为&特别的

Sub ListMenuItems()
    Dim oCBmnuTools As Office.CommandBarPopup
    Dim oCBmnuSaveMe As Office.CommandBarButton

    Set oCBmnuTools = Application.ActiveExplorer.CommandBars("Menu Bar").Controls("&Special")

Dim i As Integer
For i = 1 To oCBmnuTools.Controls.Count
    With oCBmnuTools.Controls.Item(i)
        Debug.Print .Caption & vbCr & .Parameter & vbCr
    End With
Next i
End Sub

相关内容