如何在 Outlook 中封鎖含有 ZIP 附件的電子郵件？

此方法將介紹一段 VBA 程式碼，並透過該 VBA 指令碼建立規則，自動在 Outlook 中封鎖所有附帶 .zip 附件的電子郵件。請依照下列步驟操作：

1. 在 Outlook 中，同時按下 Alt+F11 鍵，即可開啟 Microsoft Visual Basic for Applications 視窗。

2. 點選插入＞ 模組，並將下方的 VBA 程式碼貼上至新開啟的模組視窗中。

VBA：將附帶 .zip 附件的電子郵件移至垃圾郵件資料夾

Dim I As Long
'Check each attachment
For I = 1 To Item.Attachments.Count
'If the attachment's file name ends with .zip
If Right(UCase(Item.Attachments.Item(I).FileName), 4) = ".ZIP" Then
'Move the message to Junk E-mail
Item.Move Application.Session.GetDefaultFolder(olFolderJunk)
'No need to check any of this message's remaining attachments
Exit For
End If
Next I
End Sub

3. 儲存 VBA 程式碼後，關閉 Microsoft Visual Basic for Applications 視窗。

4. 現在您已回到 Outlook 主介面。請在指定的電子郵件帳戶中選取任一封電子郵件，然後點擊首頁 > 規則 > 管理規則與警示。請參閱截圖：

5. 在「規則與警示」對話方塊中，請點選新增規則（位於）電子郵件規則索引標籤下方）。詳情請參閱截圖：

6. 此時會開啟規則嚮導。請點選對我收到的郵件套用規則選項，再點擊下一步按鈕。請參閱截圖：

7. 在規則精靈（選取條件）中，請勾選包含附件選項，然後點擊下一步按鈕。請參閱截圖：

8. 在規則精靈（選取動作）中，請依照下列截圖所示操作：
（1）勾選執行指令碼選項；
（2）於 步驟 2 區段中，點選「指令碼」文字；
（3）在「選取指令碼」對話方塊中，選取新加入的 VBA 指令碼，然後按一下確定按鈕；
（4）按一下下一步按鈕。

9. 直接在規則嚮導（選取例外）中點擊下一步按鈕。

10. 現在進入最後一個規則精靈，請（1）在 步驟 1 方塊中為新規則命名，（2）於 步驟 2 區段依需求設定選項，然後（3）點擊完成按鈕。請參閱截圖：

11. 關閉「規則與警示」對話方塊。

至此，您已完成設定包含指定 VBA 指令碼的規則，所有附帶 .zip 附件的來信將自動移至垃圾郵件資料夾。

防止 Outlook 封鎖附件

從 Outlook 電子郵件中刪除被封鎖的附件