Algunos usuarios prefieren eliminar el correo electrónico original después de responderlo, ya que la respuesta contiene la información del correo electrónico original. Este artículo compartirá 2 medios rápidos para realizarlo automáticamente.
De forma predeterminada, Outlook está configurado para incluir automáticamente el mensaje original en la respuesta. En este caso, a muchos usuarios les gustaría eliminar el mensaje original, dejando solo la respuesta en su buzón. Esto no solo puede mantener su buzón de correo en un tamaño pequeño, sino que también puede dejar sus correos electrónicos en orden. Si no está dispuesto a eliminar los correos electrónicos originales manualmente, puede usar los siguientes 2 trucos para automatizarlo.
Consejo 1: utilice Quick Step
Outlook viene con un paso rápido nativo "Responder y eliminar", como la siguiente imagen. Este paso rápido puede eliminar automáticamente el mensaje original y mostrar una respuesta al hacer clic en él.
Si no puede encontrar este paso rápido, es muy probable que lo haya eliminado antes por accidente. También puede volver a crearlo siguiendo los pasos a continuación.
- En primer lugar, haga clic en el botón "Crear nuevo" en el grupo "Pasos rápidos".
- Luego, en el cuadro de diálogo emergente, asígnele un nombre, como "Responder y eliminar".
- A continuación, en la sección "Acciones", seleccione "Responder".
- Posteriormente, haga clic en el botón "Agregar acción".
- Y luego agregue la acción "Eliminar mensaje".
- Finalmente presione el botón "Guardar".
De esta manera, siempre debe usar este paso rápido para responder correos electrónicos. Si aún desea utilizar el botón "Responder" estándar en el grupo "Responder" para lograr "Responder y eliminar", puede consultar los siguientes medios.
Consejo 2: use Outlook VBA
- En primer lugar, presione los botones de tecla "Alt + F11" en Outlook.
- Luego, en la siguiente ventana del editor de VBA, abra el proyecto "ThisOutlookSession".
- A continuación, copie y pegue los siguientes códigos VBA en él.
Public WithEvents objExplorer As Outlook.Explorer
Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objMail As Outlook.MailItem
Private Sub Application_Startup()
Set objExplorer = Outlook.Application.ActiveExplorer
Set objInspectors = Outlook.Application.Inspectors
End Sub
Private Sub objExplorer_SelectionChange()
On Error Resume Next
If TypeOf Application.ActiveExplorer.Selection.Item(1) Is MailItem Then
Set objMail = Application.ActiveExplorer.Selection.Item(1)
End If
End Sub
Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
If TypeOf Inspector.CurrentItem Is MailItem Then
Set objMail = Inspector.CurrentItem
End If
End Sub
Private Sub objMail_Reply(ByVal Response As Object, Cancel As Boolean)
objMail.Delete
'If you want to only delete the specific email when replying it
'You can specify the condition of the email as per your needs
'like the following lines
'If (InStr(LCase(objMail.Subject), "test") > 0) Then
' objMail.Delete
'End If
End Sub
- Después de eso, firme este código digitalmente.
- Además, recuerde cambiar la configuración de las macros de Outlook para permitir las macros firmadas digitalmente.
- Finalmente, reinicie Outlook para activar el nuevo proyecto VBA. A partir de ahora, cuando responda a un correo electrónico pulsando el botón estándar "Responder", el correo original se eliminará automáticamente.
Recupere sus datos de Outlook comprometidos
Si encuentra repentino Daño de Outlook Inesperadamente, debes intentar recuperar tus datos de Outlook. Como siempre, el mejor y más sencillo método es recuperarlos desde las copias de seguridad. Pero si no tienes una copia de seguridad reciente, también puedes recurrir a una herramienta de reparación especializada, como DataNumen Outlook Repair.
Introducción del autor:
Shirley Zhang es experta en recuperación de datos en DataNumen, Inc., que es el líder mundial en tecnologías de recuperación de datos, incluyendo recuperación de mdf y productos de software de reparación de Outlook. Para más información visite www.datanumen.com