2 быстрых совета по автоматической пометке определенных входящих собраний как личных в Outlook

Перспективные решения 29 сентября, 2025
Поделись сейчас:

Чтобы защитить вашу конфиденциальность, вам всегда может потребоваться пометить некоторые определенные встречи как частные. Эта статья познакомит вас с двумя быстрыми способами автоматической пометки определенных как частных.

Моя предыдущая статья «2 быстрых совета, как сделать несколько встреч в Outlook приватными” научил вас 2 способам отметить несколько встреч как личные за один раз. Но оба они не могут помочь вам автоматически помечать определенные входящие встречи как частные. Когда дело доходит до автоматизации, возможно, вы подумаете о правиле Outlook. Но по умолчанию нет действия «отметить как личное». К счастью, для создания такого действия можно использовать короткий скрипт. Более того, вам разрешено делать это напрямую с помощью Outlook VBA. Итак, здесь мы подробно расскажем об этих двух советах.

Автоматически помечать определенные входящие собрания как частные

Совет 1: используйте правило и короткий сценарий

  1. Для начала запустите программу Outlook.
  2. Затем нажмите «Alt + F11», чтобы получить доступ к редактору VBA.
  3. Затем скопируйте и вставьте следующий скрипт VBA в новый модуль.
Sub AutoMarkMeetingPrivate(objMeetingRequest As MeetingItem)
    Dim objMeeting As Outlook.AppointmentItem
 
    If TypeOf objMeetingRequest Is MeetingItem Then
       Set objMeeting = objMeetingRequest.GetAssociatedAppointment(True)
       objMeeting.Sensitivity = olPrivate
       objMeeting.Save
    End If
End Sub
  1. Затем выйдите из редактора VBA.
  2. Затем нажмите «Правило» > «Управление правилами и оповещениями» на вкладке «Главная».
  3. После этого нажмите «Новое правило».
  4. Затем выберите «Применить правило к сообщениям, которые я получаю» и нажмите «Далее».
  5. Затем включите конкретные условия для ограничения конкретных встреч, например, с помощью определенных слов в теме или теле письма.
  6. Кроме того, вам необходимо добавить условие «использовать форму приглашения на собрание», выполнив шаги, показанные на следующем снимке экрана:использовать форму запроса на встречу
  7. После указания условия нажмите «Далее».
  8. Позже нужно указать действие.
  • Выберите «запустить скрипт».
  • Щелкните ссылку «скрипт».
  • Выберите ранее добавленный сценарий VBA.
  • Нажмите «ОК» и «Далее».запустить сценарий
  1. В конце концов, вы можете следовать инструкциям, чтобы завершить настройку правила, как обычно.

Помимо использования правила Outlook для установки условий конкретной встречи, вы можете использовать Outlook VBA, чтобы получить его, как показано ниже.

Совет 2. Используйте Outlook VBA

  1. Во-первых, нажмите клавиши «Alt + F11».
  2. Затем откройте окно проекта ThisOutlookSession.
  3. Затем скопируйте и вставьте в него следующие коды.
Public WithEvents objIncomingItems As Outlook.Items

Private Sub Application_Startup()
    Set objIncomingItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub

Private Sub objIncomingItems_ItemAdd(ByVal Item As Object)
    Dim objMeetingRequest As Outlook.MeetingItem
    Dim objMeeting As Outlook.AppointmentItem
 
    If TypeOf Item Is MeetingItem Then
       Set objMeetingRequest = Item
       Set objMeeting = objMeetingRequest.GetAssociatedAppointment(True)
       'Change the condition as per your actual needs
       If (objMeetingRequest.SenderEmailAddress = "johnsmith@datanumen.com") Or (InStr(LCase(objMeeting.Subject), "test") > 0) Then
          objMeeting.Sensitivity = olPrivate
          objMeeting.Save
       End If
    End If
End Sub

Коды VBA — автоматическая пометка определенных входящих совещаний как частных

  1. После этого подпишите этот код и измените настройки макроса.
  2. Наконец, перезапустите Outlook, чтобы активировать новую встречу.

Устранение неприятных проблем с Outlook

Практически бесспорный факт, что файлы Outlook PST подвержены ошибкам. Поэтому необходимо уделять особое внимание защите данных Outlook PST. Например, следует регулярно создавать резервные копии файлов PST. Кроме того, необходимо иметь под рукой надежный и эффективный инструмент для восстановления, например, DataNumen Outlook Repairкоторый способен исправить PST ошибки, не вспотев.

Об авторе:

Ширли Чжан — эксперт по восстановлению данных в DataNumen, Inc., которая является мировым лидером в области технологий восстановления данных, включая поврежденный мдф и программные продукты для ремонта Outlook. Для получения дополнительной информации посетите www.datanumen.com

Поделись сейчас:

Комментарии закрыты.