如何一次单击重命名一封（或多封）邮件的主题？

Question

法国法律规定您可以使用您的专业邮件帐户发送私人邮件。

但是如果您想保留此邮件的隐私，其主题必须提及此隐私（使用 "Perso" 或 "Privé"，例如）。

问题是当您收到其他人的邮件时，您必须手动重命名它们。

如何在Outlook中添加一个按钮来一键完成？

Answer 1

使用 Outlook，您可以创建自己的脚本。以下是操作方法。

1。激活功能区中的开发人员选项卡

1. 单击文件选项卡
2. 点击"Options"
3. 选择"Customize Ribbon"
4. 在window右边勾选"Developer"

2。创建脚本

1. 单击开发人员选项卡并选择 "Macros"（两次）
2. 为您的新宏命名（例如"renamePerso"）并点击"Create"
3. 在新的window中，您必须输入将要执行的代码。

复制并粘贴此代码：

Sub renamePerso()
    For x = 1 To Outlook.Application.ActiveExplorer.Selection.Count
        Set obj = Outlook.Application.ActiveExplorer.Selection.Item(x)
        If obj.Class = OlObjectClass.olMail Then
            obj.Subject = "[PERSO] " + obj.Subject
        End If
    Next x
End Sub

4. 您现在可以退出编辑器，您的代码必须保存

3。快速访问您的宏

1. 单击文件选项卡
2. 点击"Options"
3. 选择快速访问工具栏
4. 下 "Choose commands from:"、select "Macros"
5. Select 您的宏并单击 "Add > >"
6. 在命令列表下，勾选"Show Quick Access Toolbar below the Ribbon"

4。如何使用脚本

要在电子邮件（或一对）的主题开头添加“[Perso]”提及，您只需：

• select 它（或它们与 Ctrl 或 Shift）
• 点击功能区下的相应按钮

如果在重启后无法再次使用宏，则必须检查 your security settings。