☰

Outlook 2010 中“查找相关邮件”的快捷方式

tag-icon • tag-icon microsoft-outlook microsoft-outlook-2010
Outlook 2010 中“查找相关邮件”的快捷方式

在 Outlook 2010 中是否可以将键盘快捷键绑定到“查找相关内容 -> 此对话中的消息”功能？

我尝试了“自定义功能区”和“自定义快速访问工具栏”选项来获取可以绑定到 Alt 键组合的按钮，但我无法在可用命令列表中找到“查找相关”命令或“此对话中的消息”命令。

如果有人解决过这样的问题，请帮忙。

答案1

免责声明：我知道这不适用于 Outlook 2010，但这可能为您提供足够的灵感，教您如何基于 Outlook 2007 结构进行构建。

笔记：可以使用 VBA 宏或 Outlook 插件构建以下示例。

如果您在层次结构中找到“相关消息”所在的位置CommandBar（Outlook 菜单结构） - 您可以利用该Copy机制，将现有的CommandBarButton标准CommandBar（对于 Outlook 2007）。完成此操作后，您可以重命名Caption并分配不同的快捷键（请参阅下文以供参考）。在这个例子中，我们可以使用Alt+M来触发“相关消息”高级查找对话框。

VSTO 参考

Outlook.Explorer explorer = Application.ActiveExplorer();

// retrieve menu toolbar for this explorer
CommandBar menuBar = explorer.CommandBars.ActiveMenuBar;

for (int i = 1; i <= menuBar.Controls.Count; i++)
{
    if (menuBar.Controls[i].Caption == "&Tools")
    {
        var toolsMenu = menuBar.Controls[i] as CommandBarPopup;
        for (int j = 1; j <= toolsMenu.Controls.Count; j++)
        {
            if (toolsMenu.Controls[j].Caption == "&Instant Search")
            {
                var searchMenu = toolsMenu.Controls[j] as CommandBarPopup;

                for (int k = 1; k <= searchMenu.Controls.Count; k++)
                {
                    if (searchMenu.Controls[k].Caption == "&Related Messages...")
                    {
                        var related = searchMenu.Controls[k] as CommandBarButton;
                        var relatedClone = related.Copy(explorer.CommandBars["Standard"]);
                        relatedClone.Caption = "Related &Messages";
                    }
                }
            }
        }
    }

}

在 Outlook 2010 中，您可能只需尝试执行以下操作，因为没有标准命令栏 (它被功能区 UI 取代）。然后使用Alt+M然后Enter触发“相关消息”高级查找对话框。但是 - 这尚未经过测试。

var relatedClone = related.Copy(menuBar);

VBA 参考

Sub AddRelatedMessages()
   Dim menuBar As CommandBar
   Dim toolsMenu As CommandBarPopup, searchMenu As CommandBarPopup
   Dim related As CommandBarButton, relatedClone As CommandBarButton
   Set menuBar = Application.ActiveExplorer().CommandBars.ActiveMenuBar

   Dim i As Integer, j As Integer, k As Integer

   For i = 1 To menuBar.Controls.Count Step 1
        If (menuBar.Controls(i).Caption = "&Tools") Then
            Set toolsMenu = menuBar.Controls(i)
            For j = 1 To toolsMenu.Controls.Count Step 1
                If (toolsMenu.Controls(j).Caption = "&Instant Search") Then
                    Set searchMenu = toolsMenu.Controls(j)
                    For k = 1 To searchMenu.Controls.Count Step 1
                        If (toolsMenu.Controls(k).Caption = "&Related Messages...") Then
                            Set related = searchMenu.Controls(k)
                            Set relatedClone = related.Copy(Explorer.CommandBars("Standard"))
                            relatedClone.Caption = "Related &Messages"
                        End If
                    Next k
                End If
            Next j
        End If
    Next i
End Sub

答案2

我认为应该是alt+F然后 ( alt+ C)。

但它对我不起作用，因为当我这样做（alt+ F）时，它会转到文件点击。

答案3

获取可以绑定到 Alt 键组合的按钮，

  • 转到“自定义功能区”、“所有命令”

  • 滚动到“在对话中查找消息”

  • 将其添加（添加 >>）到主页，新组（自定义）

之后，右键单击主页功能区上的新按钮“此对话中的消息”，然后选择

  • 添加到快捷工具栏

在我的情况下是第四个快速工具栏按钮，所以 ALT-4 是快捷方式。

希望这能回答你的问题。

相关内容