¿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 incluyan 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 revísalo 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 en 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 es ideal para uso frecuente.
- Lento: 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 todos (Adjuntos) te permite guardar adjuntos de múltiples correos electrónicos o carpetas completas con solo unos pocos clics. Olvídate de 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 manteniendo los archivos adjuntos originales con un solo clic.
¡Desbloquea la máxima eficiencia en el correo electrónico con Kutools para Outlook! Accede a 70 funciones poderosas completamente gratis, para siempre. ¡Descarga la versión gratuita ahora!
Selecciona el correo electrónico que contiene los archivos adjuntos que deseas conservar. 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 solo 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 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.EjecutarResponderATodosConAdjuntos para responder a todos o selecciona EstaSesiónDeOutlook.EjecutarResponderConAdjuntos 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 deshabilitadas 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 y 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
Últimas noticias: ¡Kutools para Outlook lanza su versión gratuita!
Descubre la nueva versión GRATUITA de Kutools para Outlook con más de70 funciones increíbles, ¡para que la disfrutes PARA SIEMPRE! ¡Haz clic para descargar ahora!
📧 Automatización de Email: Respuesta automática (Disponible para POP e IMAP) / Programar envío de correos / CC/BCC automático por regla al enviar correo / Reenvío automático (Regla avanzada) / Agregar saludo automáticamente / Dividir automáticamente emails con múltiples destinatarios en mensajes individuales...
📨 Gestión de Email: Recuperar correo electrónico / Bloquear correos fraudulentos por asunto y otros criterios / Eliminar correos electrónicos 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 correos importantes / Minimiza Outlook en vez de cerrarlo...
👍 Funciones de un solo clic: Responder a Todos con Adjuntos / Correos electrónicos anti-phishing / 🕘Mostrar la zona horaria del remitente...
👩🏼🤝👩🏻 Contactos y Calendario: Agregar contactos en lote desde correos seleccionados / Dividir un grupo de contactos en grupos individuales / Eliminar recordatorio de cumpleaños...
