在Outlook 2010中的“新邮件消息”功能区中切换自定义按钮

Question

我创建了一个新的自定义按钮，将灵敏度设置为机密。

我希望按钮能够执行以下操作：

1. 每次按下按钮时切换设置（设置和取消设置机密标签）。
2. 当灵敏度设置当前设置为机密时，将突出显示（类似于设置'高重要性'标签的行为。

Sub setConfidential()

ActiveInspector.CurrentItem.Sensitivity = olConfidential

End Sub

Answer 1

Re：每次按下按钮时切换设置（设置和取消设置机密标签）。

Sub ToggleSensitivity()
    if ActiveInspector.CurrentItem.Sensitivity = olConfidential then
        ActiveInspector.CurrentItem.Sensitivity = olNormal
    else
        ActiveInspector.CurrentItem.Sensitivity = olConfidential
    end if
End Sub