¿Cómo mover un mensaje de correo electrónico a la carpeta especificada después de leerlo en Outlook?

Mover el mensaje de correo electrónico a una carpeta específica después de leerlo es la mejor manera de mantener limpia la carpeta Bandeja de entrada en Outlook. Para muchos usuarios de Outlook, tienden a crear una regla para el movimiento de estos correos electrónicos leídos. En realidad, Outlook no admite este proceso de asistente de reglas. En este artículo, le mostraremos cómo mover mensajes de correo electrónico a la carpeta especificada después de leer con el código VBA en Outlook.

Mueva el mensaje de correo electrónico a la carpeta especificada después de leerlo en Outlook

Mueva el mensaje de correo electrónico a la carpeta especificada después de leerlo en Outlook

Puede mover mensajes de correo electrónico a una carpeta específica después de leer con el código VBA en ejecución en Outlook.

1. En primer lugar, debe crear un nuevo nombre de carpeta "Revisado”En la carpeta Bandeja de entrada.

2. Abra la carpeta Bandeja de entrada, luego presione el otro + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

3. Luego haga doble clic para expandir Proyecto1 > Objetos de Microsoft Outlook > Esta sesión de Outlook para abrir el Proyecto Vba.OTM editor.

4. Luego copie y pegue el código VBA a continuación en el editor VbaProject.OTM como se muestra en la captura de pantalla anterior.

Código VBA: mover mensajes después de leer

Sub MoveInbox2Reviewed()
On Error Resume Next
Set oOutlook = CreateObject("Outlook.Application")
Set oNamespace = oOutlook.GetNamespace("MAPI")
Set oFolderSrc = oNamespace.GetDefaultFolder(olFolderInbox)
Set oFolderDst = oFolderSrc.Folders("Reviewed")
Set oFilteredItems = oFolderSrc.Items.Restrict("[UnRead] = False")
For Each oMessage In oFilteredItems
    oMessage.Move oFolderDst
Next
End Sub 

5. Luego haga clic en el Guardar botón para guardar el código VBA y luego cerrar el Microsoft Visual Basic para aplicaciones ventana.

6. Haga clic derecho en el Acceso rapido a la barra de herramientasY seleccione Personalizar la barra de herramientas de acceso rápido desde el menú contextual. Ver captura de pantalla:

7. En el Opciones de outlook cuadro de diálogo, debe:

1). Seleccione Macros existentes Elija comandos de la lista desplegable;

2). Seleccione Proyecto 1. ThisOutlookSession en la caja debajo del Elija comandos de la lista desplegable;

3). Haga clic en el Añada botón;

4). Haga clic en el OK del botón.

8. Entonces puede ver el Macro botón que se muestra en el Acceso rapido a la barra de herramientas. Asegúrese de que se encuentra en la carpeta de la bandeja de entrada desde la que desea mover todos los mensajes leídos, luego haga clic en el Macro para ejecutar el código VBA dentro de la Bandeja de entrada.

Notas:

1. Este código VBA se puede aplicar en Outlook 2007, 2010 y 2013; Pero, en Outlook 2007, puede hacer clic directamente en el Ejecutar botón para ejecutar el código.

2. Si existen varias cuentas de correo electrónico en su Outlook, el código VBA solo se puede aplicar en la cuenta cuyo archivo de datos está configurado como predeterminado. Puede comprobar el archivo de datos predeterminado haciendo clic en Archive > Info > Configuración > Configuración para abrir el Configuración caja de diálogo. Entonces ve al Archivo de datos pestaña, verá que el archivo de datos predeterminado está marcado con antes.

3. Si desea cambiar el archivo de datos predeterminado a otra cuenta de correo electrónico, seleccione y resalte la cuenta que desea establecer como predeterminada, luego haga clic en el Establecer por defecto existentes Configuración caja de diálogo.

4. Cuando ejecute el código VBA por primera vez y descubra que los mensajes leídos no se mueven todos a la vez, siga haciendo clic en el botón Macro hasta que se muevan todos los mensajes leídos en la Bandeja de entrada.

---

Las mejores herramientas de productividad de oficina

Kutools para Outlook - Más de 100 potentes funciones para potenciar tu perspectiva

🤖 Asistente de correo AI: Correos electrónicos profesionales instantáneos con magia de IA: respuestas geniales con un clic, tono perfecto y dominio multilingüe. ¡Transforme el correo electrónico sin esfuerzo! ...

📧 Automatización de correo electrónico: Fuera de la oficina (disponible para POP e IMAP)  /  Programar envío de correos electrónicos  /  CC/CCO automático según reglas al enviar correo electrónico  /  Reenvío automático (reglas avanzadas)   /  Agregar saludo automáticamente   /  Divida automáticamente correos electrónicos de múltiples destinatarios en mensajes individuales ...

📨 Gestión de correo electrónico: Recuperar correos electrónicos fácilmente  /  Bloquear correos electrónicos fraudulentos por sujetos y otras personas  /  Eliminar correos electrónicos duplicados  /  Búsqueda Avanzada  /  Consolidar carpetas ...

📁 Archivos adjuntos profesionales: Guardar lote  /  Separación de lotes  /  Comprimir por lotes  /  Ahorro automático   /  Desconexión automática  /  Autocompresión ...

???? Interfaz mágica: 😊Más emojis bonitos y geniales   /  Aumente su productividad en Outlook con vistas con pestañas  /  Minimizar Outlook en lugar de cerrar ...

👍 Maravillas con un clic: Responder a todos los archivos adjuntos entrantes  /   Correos electrónicos antiphishing  /  🕘Mostrar zona horaria del remitente ...

👩🏼‍🤝‍👩🏻 Contactos y calendario: Agregar por lotes contactos de correos electrónicos seleccionados  /  Dividir un grupo de contactos en grupos individuales  /  Eliminar recordatorios de cumpleaños ...

Mas de Características 100 ¡Espere su exploración! Haga clic aquí para descubrir más.

Leer Mas       Descargar gratis      Comprar