Outlookで新しい予定の背景色をプリセットする方法

Outlookソリューション 2025 年 9 月 29 日

新しい予定を作成する際、開いた予定ウィンドウには、背景色を直接設定できるオプションがありません。そのため、新しい予定の背景色を事前に設定したい場合は、この記事で紹介する方法をご利用ください。

ご存知のように、Outlookでメールの背景色を変更するのは非常に簡単です。具体的には、開いたメッセージウィンドウで、次のスクリーンショットに示すように、[オプション]タブに[ページの色]ボタンがあります。それをクリックした後、あなたは背景のためにあなたの好きな色を選ぶことができます。

しかし、メールとは異なり、予定にはそのような機能はありません。開いた予定ウィンドウには、「オプション」タブはおろか、「ページの色」ボタンもありません。したがって、予定の背景色を事前に設定したい場合は、別の解決策を探す必要があります。以下では、VBA を使用する方法を紹介します。VBA に慣れていない場合は、次の投稿を参照してください。「OutlookでVBAコードを実行する方法"

新しい予定のプリセット背景色

まず、Outlookで「Alt + F11」キーを押してVBAエディターを起動します。
次に、「MS Word オブジェクトライブラリ参照」を有効にします。VBAでオブジェクトライブラリ参照を追加する方法"
次に、次のVBAコードを「ThisOutlookSession」プロジェクトにコピーします。

Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objApptInspector As Outlook.Inspector

Private Sub Application_Startup()
    Set objInspectors = Outlook.Application.Inspectors
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeOf Inspector.CurrentItem Is AppointmentItem Then
       Set objApptInspector = Inspector
    End If
End Sub

Private Sub objApptInspector_Activate()
    Dim objAppointment As Outlook.AppointmentItem
    Dim objApptDocument As Word.Document
 
    Set objAppointment = objApptInspector.CurrentItem
 
    'Work on new appointment
    If objAppointment.Subject = "" Then
       Set objApptDocument = objApptInspector.WordEditor
 
       'Change background color
       'Modify code as per your needs
       objApptDocument.Background.Fill.ForeColor.ObjectThemeColor = wdThemeColorAccent1
       objApptDocument.Background.Fill.ForeColor.TintAndShade = 0.8
       objApptDocument.Background.Fill.Visible = msoTrue
       objApptDocument.Background.Fill.Solid
    End If
End Sub

その後、「Application_Startup」サブルーチンにカーソルを移動します。
最後に「F5」キーボタンを押します。
次に、Outlookの[カレンダー]ペインに移動し、[新しい予定]をクリックします。
次の図に示すように、背景色が変更された新しい予定がすぐに表示されます。

Outlookのデータ損失を回避する

Outlookのデータの損傷や損失に苦しむことを躊躇する必要があると考えられています。したがって、さまざまな予防策を講じる必要があります。たとえば、一貫性のある更新されたバックアップを取得することは必要な問題です。さらに、受信トレイ修復ツールが配置されている場所とその実行方法を知っている必要があります。大事なことを言い忘れましたが、あなたはまた、次のような別の経験豊富なサードパーティのPST修復ツールを保持する必要があります DataNumen Outlook Repair。それができる PSTを修復する瞬間の問題。

著者紹介：

Shirley Zhangは、のデータ復旧の専門家です。 DataNumen、Inc。は、以下を含むデータ復旧技術の世界的リーダーです。破損したmdf と見通し修理ソフトウェア製品。詳細については、次のWebサイトをご覧ください。 WWW。datanumen.com