Note: The other languages of the website are Google-translated. Back to English

¿Cómo mover correos electrónicos de remitentes desconocidos a una carpeta específica en Outlook? 

En su trabajo diario, puede recibir muchos correos electrónicos de remitentes desconocidos que no están guardados en su carpeta Contactos. Estos pueden ser algunos correos electrónicos no deseados o maliciosos; en este caso, desea mover automáticamente estos correos electrónicos a una carpeta específica en lugar de a la Bandeja de entrada. ¿Cómo podrías resolver este trabajo en Outlook?

Mueva los correos electrónicos de remitentes desconocidos a una carpeta específica creando una regla

Mueva los correos electrónicos de remitentes desconocidos a una carpeta específica aplicando el código VBA


Mueva los correos electrónicos de remitentes desconocidos a una carpeta específica creando una regla

En realidad, puede crear una regla para mover los correos electrónicos de remitentes desconocidos a una carpeta específica automáticamente, haga lo siguiente:

1. Cree una nueva carpeta en la carpeta Bandeja de entrada que colocará los correos electrónicos provenientes de remitentes desconocidos como se muestra en la siguiente captura de pantalla:

doc mover correos electrónicos de desconocido 1

2. Luego haga clic Inicio > Reglas > Administrar reglas y alertas, ver captura de pantalla:

doc mover correos electrónicos de desconocido 2

3. En la Reglas y Alertas cuadro de diálogo, haga clic en Nueva regla bajo el Reglas de correo electrónico pestaña, ver captura de pantalla:

doc mover correos electrónicos de desconocido 3

4. Y haga clic en OK botón para ir a la Asistente de reglas, haga clic Aplicar la regla en el mensaje que recibo Opción de la Comience desde una regla en blanco cuadro de sección, ver captura de pantalla:

doc mover correos electrónicos de desconocido 4

5. Luego haga clic Siguiente , en este paso, no seleccione ninguna opción y haga clic en Siguiente botón directamente, aparece un cuadro de advertencia, haga clic en botón, ver captura de pantalla:

doc mover correos electrónicos de desconocido 5

6. Y en el siguiente cuadro de diálogo, marque moverlo a la carpeta especificada opción en el Paso 1: seleccione la (s) acción (es) cuadro de lista y luego haga clic en el texto vinculado especificado, y en el abierto Reglas y Alertas cuadro de diálogo, especifique la carpeta a la que desea mover los correos electrónicos, vea la captura de pantalla:

doc mover correos electrónicos de desconocido 6

7. Hacer clic OK botón, y siga haciendo clic Siguiente botón, en este ¿Hay alguna excepción? diálogo, comprobar excepto si el remitente está en la libreta de direcciones especificada opción en el Paso 1: seleccione la (s) excepción (es) cuadro de lista y luego haga clic en el texto vinculado especificado, Y un Agregar lista de direcciones aparecerá el cuadro emergente, seleccione una carpeta de contactos que contenga los contactos que desea excepto, vea la captura de pantalla:

doc mover correos electrónicos de desconocido 7

8. Luego haga clic Añada botón, y luego haga clic Siguiente para ir al último cuadro de diálogo del asistente, escriba un nombre de regla en el Paso 1: especifique un nombre para esta regla cuadro de texto y verifique Enciende esta regla Opción de la Paso 2: regla de configuración sección de opciones. Ver captura de pantalla:

doc mover correos electrónicos de desconocido 8

9. Y luego haz clic Terminar y Ok botones para cerrar los diálogos. A partir de ahora, cuando los correos electrónicos provengan de remitentes desconocidos, se moverán a la carpeta específica automáticamente.


Mueva los correos electrónicos de remitentes desconocidos a una carpeta específica aplicando el código VBA

Puede ser que el método anterior sea problemático para usted, aquí puede aplicar un código para tratarlo lo más rápido posible.

1. Mantenga pulsado el ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. En la Microsoft Visual Basic para aplicaciones ventana, haga doble clic Esta sesión de Outlook de Proyecto1 (VbaProject.OTM) panel para abrir el modo y luego copie y pegue el siguiente código en el módulo en blanco.

Código de VBA: mueva automáticamente los correos electrónicos de remitentes desconocidos a una carpeta específica:

Public WithEvents MailItems As Outlook.Items
Private Sub Application_Startup()
    Set MailItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub MailItems_ItemAdd(ByVal item As Object)
Dim xSenderEmailAddress As String
Dim xContactItems As Outlook.Items
Dim xContactItem As ContactItem
Dim I As Long
Dim xFilter As String
Dim xTargetFolder As Folder
Dim xContactFolder As Folder
Dim xStore As Store
Dim xInboxFlds As Folders
Dim xSubFolder As Folder
Dim xFound As Boolean
On Error Resume Next
If item.Class = olMail Then
    xSenderEmailAddress = item.SenderEmailAddress
End If
For Each xStore In Outlook.Application.Session.Stores
    Set xContactItems = xStore.GetDefaultFolder(olFolderContacts).Items
    For I = 3 To 1 Step -1
        xFilter = "[Email" & I & "Address] = " & xSenderEmailAddress
        Set xContactItem = xContactItems.Find(xFilter)
        If TypeName(xContactItem) <> "Nothing" Then Exit For
    Next
Next
If xContactItem Is Nothing Then
    Set xInboxFlds = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Folders
    xFound = False
    For Each xSubFolder In xInboxFlds
        If xSubFolder.Name = "Unknown" Then
            xFound = True
            Set xTargetFolder = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Folders("Unknown")
            Exit For
        End If
    Next
    If xFound = False Then
        Set xTargetFolder = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Folders.Add("Unknown")
    End If
    item.Move xTargetFolder
End If
End Sub

doc mover correos electrónicos de desconocido 9

3. Luego, guarde el código y cierre la ventana de código, y reinicie Outlook para que el código surta efecto. De ahora en adelante, cuando los correos electrónicos provengan de algunos remitentes desconocidos, se moverán a la carpeta Desconocido automáticamente, vea la captura de pantalla:

doc mover correos electrónicos de desconocido 10

Nota:: Los Desconocido La carpeta se creará automáticamente cuando haya algunos correos electrónicos desconocidos entrantes. Puede cambiar el nombre de la carpeta "desconocido”A otros en el guión.


Kutools para Outlook: trae 100 funciones avanzadas a Outlook y hace que el trabajo sea mucho más fácil.

  • Auto CC / BCC por reglas al enviar correo electrónico; Reenvío automático Varios correos electrónicos personalizados; Respuesta automática sin servidor de intercambio y más funciones automáticas ...
  • Advertencia de BCC - mostrar mensaje cuando intente responder a todos si su dirección de correo está en la lista CCO; Recordar si faltan archivos adjuntosy más funciones de recordatorio ...
  • Responder (todos) con todos los archivos adjuntos en la conversación de correo; Responder muchos correos electrónicos en segundos; Agregar saludo automáticamente cuando responda; Agregar fecha al asunto ...
  • Herramientas de archivos adjuntos: administre todos los archivos adjuntos en todos los correos, Desconexión automática, Comprimir todo, Renombrar todo, Guardar todo ... Informe rápido, Contar correos seleccionados...
  • Potentes correos electrónicos no deseados por costumbre; Eliminar correos y contactos duplicados... Le permite hacerlo de forma más inteligente, más rápida y mejor en Outlook.
tiro kutools outlook kutools pestaña 1180x121
tiro kutools outlook kutools plus pestaña 1180x121
 
Comentarios (0)
Aún no hay calificaciones. ¡Sé el primero en calificar!
No hay comentarios publicados aquí todavía
Deje sus comentarios
Publicar como invitado
×
Califica esta publicación:
0   Personajes
Ubicaciones sugeridas

Seguinos

Copyright © 2009 - www.extendoffice.com. | Reservados todos los derechos. Energizado por ExtendOffice, | Mapa del Sitio
Microsoft y el logotipo de Office son marcas comerciales o marcas comerciales registradas de Microsoft Corporation en los Estados Unidos y / o en otros países.
Protegido por Sectigo SSL