Outlook で件名なしの警告をオフまたは無効にする方法は？

Outlook 2010 および 2013 をご利用の場合、件名なしでメールを送信すると、その都度警告ダイアログが表示されます。件名を入力したくない方にとっては、この「件名なし」警告が大きな手間となるでしょう。そこで、Outlook ユーザーの皆様がこの警告から解放されるための便利なテクニックを、以下のチュートリアルでご紹介します。

Outlook で件名なしの警告をオフまたは無効にする

---

Outlook で件名なしの警告をオフまたは無効にする

Outlook 2007 では、件名なしでメールを送信しても警告は表示されません。この機能は Outlook 2010 および 2013 で有効になっていますが、件名なし警告を直接オフまたは無効にする設定項目は用意されていません。本チュートリアルでは、この警告を無効化するための VBA コードをご紹介します。

1。「Alt」キーと「F11」キーを同時に押して、「Microsoft Visual Basic for Applications」ウィンドウを開いてください。

2。「Project1」>「Microsoft Outlook Objects」をダブルクリックして展開し、「ThisOutlookSession」をダブルクリックして「VbaProject.OTM」ウィンドウを開きます。

3。以下の VBA コードをコピーし、ウィンドウ内に貼り付けてください。

VBA：件名なしの警告をオフまたは無効にする

Option Explicit
Private WithEvents oInspectors As Outlook.Inspectors

Private Sub Application_Startup()
    Set oInspectors = Outlook.Inspectors
End Sub

Private Sub oInspectors_NewInspector(ByVal Inspector As Inspector)
    Dim oItem As Object
    On Error GoTo ExitProc
    Set oItem = Inspector.CurrentItem
    If oItem.Sent = False Then
        If oItem.Subject = "" Then oItem.Subject = " "
    End If
ExitProc:
    Set oItem = Nothing
    Set Inspector = Nothing
End Sub

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    On Error Resume Next
    Item.Subject = Trim(Item.Subject)
End Sub

Private Sub Application_Quit()
    Set oInspectors = Nothing
End Sub

4。「保存」ボタンをクリックして、VBA コードを確実に保存してください。

5。Outlook アプリケーションを再起動してください。

これにより、VBA コードが有効になり、件名なしでメッセージを送信しても警告ダイアログが表示されなくなります。

注：「すべてのマクロを有効にする」オプションがチェックされていることをご確認ください。（「ファイル」＞「オプション」＞「トラストセンター」＞「トラストセンターの設定」をクリックし、「トラストセンター」ダイアログで「マクロの設定」＞「すべてのマクロを有効にする」を選択してください。）スクリーンショットをご参照ください。