¿Cómo enviar siempre un correo nuevo desde una cuenta específica en Outlook?
Supongamos que has creado múltiples cuentas de correo electrónico en tu Outlook, cuando envías un correo en Outlook, la cuenta de correo que aparece en el campo Desde depende de la cuenta en la que te encuentres actualmente. Sin importar en qué cuenta te encuentres, si deseas siempre enviar correos nuevos desde una cuenta de correo específica, el siguiente tutorial puede ayudarte; el método en este tutorial puede ser útil.
Enviar siempre un correo nuevo desde una cuenta específica con código VBA
Enviar siempre un correo nuevo desde una cuenta específica con código VBA
Este código VBA puede ayudarte a enviar fácilmente correos nuevos desde una cuenta específica en Outlook. Por favor, sigue los siguientes pasos.
1. Por favor, presiona "Alt" + "F11" para abrir el cuadro de diálogo "Microsoft Visual Basic para Aplicaciones".
2. Expande "Proyecto1" > "Objetos de Microsoft Outlook" haciendo doble clic en ellos. Luego, haz doble clic en "EstaSesiónDeOutlook" para abrir el cuadro de diálogo "VbaProject.OTM".
3. Copia y pega el siguiente código VBA en el cuadro de diálogo.
VBA: siempre enviar un correo nuevo desde una cuenta específica.
Public Sub NewBySpecAccount()
Dim oAccount As Outlook.Account
Dim oMail As Outlook.MailItem
For Each oAccount In Application.Session.Accounts
If oAccount.DisplayName = "Your account name" Then
Set oMail = Application.CreateItem(olMailItem)
oMail.SendUsingAccount = oAccount
oMail.Display
End If
Next
End Sub
4. Ahora necesitas cambiar el "Nombre de tu cuenta" por la cuenta de correo desde la cual siempre deseas enviar correos nuevos.
5. Luego, presiona la tecla "F5" en el teclado para ejecutar el código VBA.
6. Después de ejecutar el código VBA, aparecerá una nueva ventana de "Mensaje", por favor redacta tu correo y haz clic en el botón "Enviar" para enviarlo.
Nota: Este código VBA se ha probado exitosamente en Outlook 2007, 2010 y 2013, pero no se ejecuta en Exchange 2007 y 2010.
Las mejores herramientas de productividad para Office
Noticia de última hora: ¡Kutools para Outlook lanza su versión gratuita!
¡Descubre el nuevo Kutools para Outlook con más de100 increíbles funciones! Haz clic para descargar ahora.
📧 Automatización de correo electrónico: Respuesta automática (disponible para POP e IMAP) / Programar envío de correo electrónico / CC/BCC automático por regla al enviar correo / Reenvío automático (Regla avanzada) / Agregar saludo automáticamente / Dividir automáticamente correos con múltiples destinatarios en emails individuales...
📨 Gestión de correo electrónico: Recuperar correo electrónico / Bloquear correos fraudulentos por asunto y otros filtros / Eliminar duplicados / Búsqueda Avanzada / Organizar carpetas...
📁 Adjuntos Pro: Guardar en lote / Desanexar en lote / Comprimir en lote / Guardar automáticamente / Desconectar automáticamente / Auto Comprimir...
🌟 Magia en la interfaz: 😊Más emojis bonitos y modernos / Avisos cuando llegan emails importantes / Minimizar Outlook en vez de cerrar...
👍 Funciones en un clic: Responder a Todos con Adjuntos / Correos antiphishing / 🕘Mostrar la zona horaria del remitente...
👩🏼🤝👩🏻 Contactos y Calendario: Agregar contacto en lote desde emails seleccionados / Dividir un grupo de contactos en grupos individuales / Eliminar recordatorio de cumpleaños...
Utiliza Kutools en tu idioma preferido — disponible en Inglés, Español, Alemán, Francés, Chino y más de40 idiomas adicionales.
🚀 Descarga con un solo clic — Consigue todos los complementos para Office
Muy recomendado: Kutools para Office (5 en1)
Descarga los cinco instaladores a la vez con solo un clic — Kutools para Excel, Outlook, Word, PowerPoint y Office Tab Pro. Haz clic para descargar ahora.
- ✅ Comodidad en un solo clic: Descarga los cinco paquetes de instalación en una sola acción.
- 🚀 Listo para cualquier tarea en Office: Instala los complementos que necesites cuando los necesites.
- 🧰 Incluye: Kutools para Excel / Kutools para Outlook / Kutools para Word / Office Tab Pro / Kutools para PowerPoint