¿Cómo bloquear correos electrónicos con archivos adjuntos .zip en Outlook?

Este método presentará un código VBA y, a continuación, creará una regla basada en este script de VBA para bloquear automáticamente todos los correos electrónicos con archivos adjuntos .zip en Outlook. Siga estos pasos:

1. En Outlook, pulse simultáneamente las teclas Alt+F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

2. Haga clic en Insertar > Módulo y, a continuación, pegue el siguiente código VBA en la nueva ventana del módulo.

VBA: Mover correos electrónicos con archivos adjuntos .zip a la carpeta Correo no deseado

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. Guarde el código VBA y cierre la ventana de Microsoft Visual Basic para Aplicaciones.

4. Ahora volverá a la interfaz principal de Outlook. Seleccione cualquier correo electrónico en la cuenta de correo especificada y haga clic en Inicio > Reglas > Administrar reglas y alertas. Vea la captura de pantalla:

5. En el cuadro de diálogo Reglas y alertas, haga clic en Nueva regla en la pestaña Reglas de correo electrónico. Vea la captura de pantalla:

6. Ahora se abre el Asistente de reglas. Haga clic en la opción Aplicar regla a los mensajes que recibo y, a continuación, en el botón Siguiente. Vea la captura de pantalla:

7. En el paso del Asistente de reglas (Seleccione condición(es)), active la opción que tenga un archivo adjunto y haga clic en el botón Siguiente. Vea la captura de pantalla:

8. En el paso del Asistente de reglas (Seleccione acción(es)), siga lo que se muestra en la siguiente captura de pantalla:
(1) Active la opción ejecutar un script;
(2) Haga clic en el texto «un script» en la sección Paso 2;
(3) En el cuadro de diálogo Seleccionar script, elija el nuevo script VBA añadido y haga clic en el botón Aceptar;
(4) Haga clic en el botón Siguiente.

9. Haga clic directamente en el botón Siguiente en el paso Asistente de reglas (seleccione excepciones).

10. Ahora, en el último paso del Asistente de reglas: (1) asigne un nombre a la nueva regla en el cuadro Paso 1, (2) especifique las opciones que necesite en la sección Paso 2 y, por último, (3) haga clic en el botón Finalizar. Vea la captura de pantalla:

11. Cierre el cuadro de diálogo Reglas y alertas.

Hasta ahora, ha finalizado la regla con el script VBA especificado. Todos los correos electrónicos entrantes que incluyan archivos adjuntos .zip se trasladarán automáticamente a la carpeta Correo no deseado.

Evitar que Outlook bloquee archivos adjuntos

Eliminar archivos adjuntos bloqueados de los correos electrónicos en Outlook