☰

Outlook 2013 - 受信した会議の件名を編集する

tag-icon • tag-icon microsoft-outlook-2013
Outlook 2013 - 受信した会議の件名を編集する

私は Outlook 2013 を使用しており、仕事の一環として会議を受け取ります (会議はワークフローの一部として転送されます)。会議の説明で指示された作業を実行し、アーカイブします。自分のメモとして、会議の件名を編集します。これは簡単で、Outlook 2010 で行ったのとまったく同じように実行できます。会議を開いて件名を入力して保存します。ただし、これは Outlook 2013 ではできないようです。件名を入力できず、アクション ボタンが非表示になっています。何が間違っているのでしょうか?

編集: 「アクション」とは、リボンに表示されるボタンを意味します。編集を試みる前に会議の招待を承諾していません。Outlook 2010 では正常に動作しました。

答え1

これは私にとってはうまく機能しています。承諾していない会議の招待でテストしました。

私がするのは、必要な変更を加えてクリックするだけですctrl-s

表示幅が十分に大きくない場合、リボン コマンドが非表示になることがあります。ただし、キーボード ショートカットには影響しません。

答え2

私は、M$ が不可解にも削除したこの機能を復元してくれるのを期待していないので、これを実現するためのマクロを作成しました。

この機能が壊れる前と同様に、件名を変更するには、関心のある「会議項目」を開いている必要があります。

このマクロは、Exchange サーバーとの同期など、何かを壊す場合と壊さない場合があります (ただし、Exchange サーバーがそれに対処できない場合は、M$ が修復する必要があります)。

すべての免責事項が適用されます。自己責任で使用してください。結果は異なる場合があります。

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

関連情報