我正在寻找当用户在电子邮件的预览窗格中选择文字时引发的事件。例如。您正在预览窗格中查看电子邮件并选择一些文本。我没有看到对象引用这个效果的任何东西，但命名空间是如此之大，似乎总有一些对象完全符合我的需要，我不知道。
总的来说，我想做的是查看所选文本是否与模式匹配，如果是，请在右键菜单中插入一个子菜单（复制，谁是，同义词，翻译... ）。对此的帮助也将受到赞赏。我相信CommandBar是“文本”，但我不确定如何通过名称访问它。
答案 0 :(得分：0)
Outlook对象模型并没有为此提供任何内容。
答案 1 :(得分：0)
Outlook对象模型根本不公开预览窗格。您可以使用创意窗口搜索和Accessibility API访问预览窗格中的Word的Document对象。
如果使用Redemption是一个选项，它会公开SafeExplorer对象，该对象具有ReadingPane属性。获得Word.Document对象后，可以阅读Document.Application属性并使用Application.WindowSelectionChange事件。可以使用SafeExplorer.ReadingPane.SelText property访问所选文本。 Word.Application可以从SafeExplorer.ReadingPane.WordEditor.Application。
set sExplorer = CreateObject("Redemption.SafeExplorer")
sExplorer.Item = Application.ActiveExplorer
MsgBox sExplorer.ReadingPane.SelText