¿Cómo mantener los archivos adjuntos al responder en Outlook?
En Microsoft Outlook, cuando reenvías un correo electrónico, los archivos adjuntos originales permanecen intactos. Sin embargo, cuando respondes a un correo electrónico, Outlook elimina automáticamente todos los archivos adjuntos, asumiendo que no son necesarios para la conversación. Esto puede ser frustrante e ineficiente, especialmente cuando necesitas hacer referencia a archivos importantes, reenviar documentos o mantener los archivos adjuntos para un mejor contexto. Afortunadamente, hay varias formas de asegurarte de que los archivos adjuntos se mantengan incluidos al responder en Outlook, ya sea que prefieras una solución manual, de un solo clic o automatizada:
Responder con archivos adjuntos copiando y pegando manualmente (Básico y tedioso)
Responder con archivos adjuntos en un solo clic usando Kutools para Outlook 👍 (Rápido y sin esfuerzo)
Responder con archivos adjuntos automáticamente usando VBA (Técnico y requiere configuración)
Responder con archivos adjuntos copiando y pegando manualmente
Puedes copiar manualmente los archivos adjuntos de un correo electrónico y pegarlos en el mensaje de respuesta antes de enviarlo.
1. Abre Outlook, selecciona el correo electrónico al que deseas responder y prévisualízalo en el Panel de Lectura o ábrelo en una ventana separada.
2. Haz clic en cualquiera de los archivos adjuntos, luego haz clic en Seleccionar todo > Copiar bajo la pestaña Archivos adjuntos.
3. Haz clic en el botón Responder para abrir una ventana de respuesta.
4. En el mensaje de respuesta, haz clic en cualquier lugar del cuerpo del mensaje y presiona Ctrl + V o haz clic en Pegar en la pestaña Mensaje para insertar los archivos adjuntos copiados.
5. Redacta tu respuesta, revisa los archivos adjuntos y haz clic en Enviar.
Limitaciones:
- Manual y repetitivo: No ideal para uso frecuente.
- Consumidor de tiempo: Requiere pasos adicionales cada vez.
- Propenso a errores: Puedes olvidarte de copiar y pegar los archivos adjuntos.
📂 Guardar adjuntos de varios correos electrónicos sin esfuerzo
¿Cansado de guardar adjuntos uno por uno en Outlook? ¡Optimiza tu flujo de trabajo con Kutools para Outlook! La poderosa función Guardar todo (Adjuntos) te permite guardar adjuntos de varios correos electrónicos o carpetas completas en solo unos clics. Di adiós a los tediosos procesos manuales y controla tu bandeja de entrada sin esfuerzo.
Responder con archivos adjuntos en un solo clic usando Kutools para Outlook 👍
Para una forma rápida y sin esfuerzo de responder con archivos adjuntos, puedes usar Kutools para Outlook. La función Responder con archivo adjunto original te permite responder mientras mantienes los archivos adjuntos originales con solo un clic.
¡Dile adiós a la ineficiencia de Outlook! Kutools para Outlook facilita el procesamiento de correos electrónicos en lote, ¡ahora con funciones gratuitas impulsadas por inteligencia artificial! Descarga Kutools para Outlook ahora!!
Selecciona el correo electrónico que contiene los archivos adjuntos que deseas mantener. Luego haz clic en Kutools > Responder con archivo adjunto original o Responder a todos con archivo adjunto original.
¡Eso es todo! El mensaje de respuesta incluirá automáticamente todos los archivos adjuntos del correo electrónico original. Simplemente redacta tu mensaje y haz clic en Enviar.
¿Por qué usar Kutools para Outlook?
- ✅ Ahorra tiempo: No es necesario copiar y pegar manualmente los archivos adjuntos.
- ✅ Solución de un clic: Responde instantáneamente con archivos adjuntos.
- ✅ Fácil de usar: No se requieren habilidades técnicas.
Responder con archivos adjuntos automáticamente usando VBA
Para usuarios familiarizados con la programación en VBA, este método automatiza el proceso de responder con archivos adjuntos. Sin embargo, requiere habilitar macros en Outlook y agregar manualmente el script.
Paso 1: Abrir el editor de VBA
1. Selecciona el mensaje de correo electrónico al que deseas responder.
2. Presiona Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
3. En el panel izquierdo, expande Proyecto1 > Objetos de Microsoft Outlook. Haz doble clic en EstaSesiónDeOutlook para abrirla.
Paso 2: Insertar el código VBA
Copia y pega el siguiente código VBA en la ventana EstaSesiónDeOutlook:
Sub RunReplyWithAttachments()
'Update by Extendoffice 20250224
Dim xReplyItem As Outlook.MailItem
Dim xItem As Object
On Error Resume Next
Set xItem = GetCurrentItem()
If xItem Is Nothing Then Exit Sub
Set xReplyItem = xItem.Reply
CopyAttachments xItem, xReplyItem
xReplyItem.Display
Set xReplyItem = Nothing
Set xItem = Nothing
End Sub
Sub RunReplyAllWithAttachments()
Dim xReplyAllItem As Outlook.MailItem
Dim xItem As Object
Set xItem = GetCurrentItem()
If xItem Is Nothing Then Exit Sub
Set xReplyAllItem = xItem.ReplyAll
CopyAttachments xItem, xReplyAllItem
xReplyAllItem.Display
Set xReplyAllItem = Nothing
Set xItem = Nothing
End Sub
Function GetCurrentItem() As Object
On Error Resume Next
Select Case TypeName(Application.ActiveWindow)
Case "Explorer"
Set GetCurrentItem = Application.ActiveExplorer.Selection.Item(1)
Case "Inspector"
Set GetCurrentItem = Application.ActiveInspector.CurrentItem
End Select
End Function
Sub CopyAttachments(SourceItem As MailItem, TargetItem As MailItem)
Dim xFilePath As String
Dim xAttachment As Attachment
Dim xFSO As Object
Dim xTmpFolder As Object
Dim xFldPath As String
Set xFSO = CreateObject("Scripting.FileSystemObject")
Set xTmpFolder = xFSO.GetSpecialFolder(2)
xFldPath = xTmpFolder.Path & "\"
For Each xAttachment In SourceItem.Attachments
If IsEmbeddedAttachment(xAttachment) = False Then
xFilePath = xFldPath & xAttachment.Filename
xAttachment.SaveAsFile xFilePath
TargetItem.Attachments.Add xFilePath, , , xAttachment.DisplayName
xFSO.DeleteFile xFilePath
End If
Next
Set xFSO = Nothing
Set xTmpFolder = Nothing
End Sub
Function IsEmbeddedAttachment(Attach As Attachment)
Dim xAttParent As Object
Dim xCID As String, xID As String
Dim xHTML As String
On Error Resume Next
Set xAttParent = Attach.Parent
xCID = Attach.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001F")
If xCID <> "" Then
xHTML = xAttParent.HTMLBody
xID = "cid:" & xCID
If InStr(xHTML, xID) > 0 Then
IsEmbeddedAttachment = True
Else
IsEmbeddedAttachment = False
End If
End If
End Function
Paso 3: Ejecutar la macro de VBA
1. Presiona F5 o haz clic en el botón Ejecutar para ejecutar la macro.
2. En el cuadro de diálogo Macros, selecciona EstaSesiónDeOutlook.EjecutarRespuestaTodosConAdjuntos para responder a todos o selecciona EstaSesiónDeOutlook.EjecutarRespuestaConAdjuntos para responder a un destinatario. Haz clic en Ejecutar.
Resultado
La ventana de respuesta se abrirá con todos los archivos adjuntos originales incluidos. Simplemente redacta tu mensaje y haz clic en Enviar.
Ventajas y desventajas del método VBA:
- ✅ Automatizado: No es necesario copiar y pegar manualmente los archivos adjuntos.
- ❌ Requiere conocimiento de VBA : Puede no ser adecuado para principiantes.
- ❌ Las macros están desactivadas por defecto : Debes habilitarlas manualmente.
Conclusión: ¿Qué método deberías elegir?
Aquí tienes una comparación de los tres métodos para ayudarte a decidir cuál se adapta mejor a tus necesidades:
| Método | Ideal para | Facilidad de uso | Eficiencia |
|---|---|---|---|
| Copia-Pega Manual | Uso ocasional | ⭐⭐⭐⭐ | ⭐⭐ |
| Kutools para Outlook | Uso diario, usuarios no técnicos | ⭐⭐⭐⭐⭐ | ⭐⭐⭐⭐⭐ |
| Macro VBA | Amantes de la automatización, usuarios avanzados | ⭐⭐⭐ | ⭐⭐⭐⭐ |
Para la mayoría de los usuarios, Kutools para Outlook es la mejor opción, ya que es la forma más rápida y fácil de responder con archivos adjuntos en Outlook. ¡Ahora puedes responder fácilmente con archivos adjuntos en Outlook utilizando el método que mejor se adapte a tu flujo de trabajo! 🚀
Demostración: Un clic para responder con archivos adjuntos con Kutools para Outlook
Artículos relacionados:
- ¿Cómo mantener los archivos adjuntos al responder en Outlook?
- ¿Cómo guardar todos los archivos adjuntos de varios correos electrónicos en una carpeta en Outlook?
- ¿Cómo eliminar todos los archivos adjuntos de un correo electrónico en Outlook?
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