想要使用vba隐藏outlook 2010电子邮件中的密件抄送字段

时间:2014-01-03 19:45:31

标签: vba outlook visibility ribbon bcc

我正在尝试隐藏当前使用VBA在Outlook 2010中草拟的电子邮件中的密件抄送字段。隐藏它的原因是我正在使用代码向Bcc添加一个显示该字段的电子邮件地址,但后来我希望屏幕上的房地产回来。

这是我到目前为止(在ThisOutlookSession中):

    Sub add_bcc_to_cur_email()
        Dim cur_msg As MailItem
        Set cur_msg = ActiveInspector.CurrentItem
        cur_msg.BCC = "first.last@domain.com" 'this works correctly
        cur_msg.GetInspector.CommandBars.ExecuteMso "Bcc" 'this does nothing
    End Sub

我咆哮的第一棵树认为有一种方法可以直接控制Bcc字段的可见性,所以我搜索了有关它的信息,我发现this page - 第二个帖子似乎有一个解决方案,但那是2003年,唉,没有用。

然后我想我可以尝试在位于此处的功能区中启动密件抄送项目:选项>显示字段>密件。所以我用Google搜索了如何在功能区中启动一个项目,并提出了this page,其中有一些有趣的代码,但该主题似乎没有结果。

无论哪种方式 - 有没有人有任何想法? :)

祝新年快乐,并且提前非常感谢〜

1 个答案:

答案 0 :(得分:2)

这在2010年对我有用

cur_msg.GetInspector.Commandbars("Menu Bar").Controls("View").controls("Bcc Field").execute