Outlook 2013 - редактировать тему полученных встреч

Question

Я использую Outlook 2013, и как часть моей работы я получаю встречи (они пересылаются мне как часть рабочего процесса). Я выполняю работу, указанную в описании встречи, а затем архивирую их. Для своих собственных заметок я редактирую строку темы встречи. Это было легко и сделано точно так же, как в Outlook 2010 - откройте собрание, введите строку темы и сохраните. Однако это, по-видимому, невозможно в Outlook 2013. Я не могу ввести строку темы, а кнопка действий скрыта. Что я делаю неправильно?

Редактировать: под "действиями" я подразумеваю кнопку, которая появляется на ленте. Я не принял приглашение на встречу, потому что пытался редактировать; он хорошо работал в Outlook 2010.

Answer 1

Я написал макрос для достижения этой цели, так как не затаил дыхание на M $, чтобы восстановить эту функциональность, которую они необъяснимым образом забрали.

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

Этот макрос может или не может что-то сломать, возможно, включая синхронизацию с сервером Exchange (но если сервер Exchange не может справиться с этим, M $ что-то еще, чтобы M $ не сломался).

Все отказы от ответственности применяются. Используйте на свой риск. YMMV и др.

Option Explicit
Sub change_subject_of_currently_open_meeting_request()
        Dim oMail As MailItem
        Dim oMtg As MeetingItem

        On Error Resume Next
        Err.Clear
        Set oMtg = ActiveInspector.currentItem
        If Err.Number <> 0 Then
            MsgBox "This macro works only in an open MEETINGItem." & vbCrLf & "Will now exit macro."
            Exit Sub
        End If
        On Error GoTo 0

        Dim strS, t, v, p, prompt, title
        strS = oMtg.Subject

        p = "Microsoft broke the ability to edit subject lines"
        p = p & vbCrLf & "of meeting requests in the 2013 version."
        p = p & vbCrLf
        p = p & vbCrLf & "This macro provides a way to do so."

        prompt = p
        title = "Provides the ability to edit meeting request subject lines, broken in Outlook 2013."
        t = InputBox(prompt, title, strS) ' prompt, title, default
        If t <> "" Then
           If t <> strS Then
              oMtg.Subject = t
           End If
        End If
End Sub

Answer 2

Это работает нормально для меня. Я проверил с приглашением на встречу, которое я не принял.

Все, что я делаю, это делаю изменения, которые я хочу, и нажимаю Ctrl - S

Иногда команды ленты скрываются, если ширина экрана недостаточно велика, но это не влияет на сочетание клавиш.