¿Cómo adjuntar una tarjeta de presentación para todos los mensajes salientes automáticamente en Outlook?

Autor: Xiaoyang Última modificación: 2022-10-19

En algunos casos, es posible que desee enviar su vCard para todos los mensajes salientes, de modo que los destinatarios puedan guardar su información en su libreta de direcciones de forma rápida y sencilla. En Outlook, puede resolver esta tarea con los siguientes métodos lo más rápido posible.

Adjunte la tarjeta de presentación para todos los mensajes salientes automáticamente creando una firma

Adjunte la tarjeta de presentación para todos los mensajes salientes automáticamente usando el código VBA

Adjunte la tarjeta de presentación para todos los mensajes salientes automáticamente creando una firma

Normalmente, puede crear una firma de su vCard y luego activarla siempre. Por favor haz esto:

1. Cree un nuevo correo electrónico, en la ventana de nuevo mensaje, haga clic en recuadro > Firma, ver captura de pantalla:

2. En el emergente Firma y Papelería cuadro de diálogo, debajo del Firma de email pestaña, clic Nuevo e ingrese un nombre para esta nueva firma, vea la captura de pantalla:

3. Luego, haz clic OK para cerrar el Nueva firma cuadro de diálogo, seleccione este nuevo nombre de firma de la Seleccionar firma para editar cuadro de lista y, a continuación, haga clic en Tarjeta de visita, ver captura de pantalla:

4. En la Insertar tarjeta de visita cuadro de diálogo, seleccione la carpeta de contactos de la Pase a ver lista desplegable, luego seleccione la tarjeta de presentación especificada en el cuadro de lista a continuación, vea la captura de pantalla:

5. Luego, haz clic OK para cerrar este cuadro de diálogo y volver a la Firma y Papelería cuadro de diálogo, siga seleccionando el nuevo nombre de la firma y luego especifique la cuenta de correo electrónico a la que desea agregar esta firma automáticamente desde el Cuenta de correo electrónico la lista desplegable. Y luego, elija el nombre de firma recién creado de la Nuevos mensajes la lista desplegable.

Tips: Si desea agregar vCard en cada respuesta y reenvío, elija el nuevo nombre de firma con vCard en el Respuestas / reenvíos lista.

6. Después de finalizar la configuración, haga clic en OK botón. De ahora en adelante, cuando cree un nuevo mensaje, la tarjeta de presentación especificada se insertará en el cuerpo del mensaje y se agregará como archivo adjunto simultáneamente, vea la captura de pantalla:

Adjunte la tarjeta de presentación para todos los mensajes salientes automáticamente usando el código VBA

Para adjuntar una tarjeta de presentación para todos los mensajes salientes, puede guardar la tarjeta de presentación como un archivo vcf y luego aplicar un código VBA para adjuntarla como archivo adjunto automáticamente. Por favor hazlo con los siguientes pasos:

1. Ir a la Personas panel, seleccione el contacto que desea enviar como tarjeta de presentación.

2. Luego, haz clic Archive > Guardar como, en la ventana Guardar como, especifique un lugar para colocar esta tarjeta y luego escriba un nombre en el Nombre de archivo cuadro de texto y seleccione Archivos vCard del desplegable Guardar como escriba menú desplegable, vea la captura de pantalla:

3. Y luego, mantén presionado ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

4. Luego, haga doble clic Esta sesión de Outlook del desplegable Proyecto-Proyecto1 y luego copie y pegue el siguiente código en la ventana de código en blanco:

Código VBA: adjunte la tarjeta de presentación para todos los mensajes salientes automáticamente

Public WithEvents GInpectors As Inspectors
Private Sub Application_Startup()
  Set GInpectors = Application.Inspectors
End Sub
Private Sub GInpectors_NewInspector(ByVal Inspector As Inspector)
'Updateby ExtendOffice
Dim xMail As MailItem
Dim xSubject As String
On Error Resume Next
If Inspector.CurrentItem.Class <> olMail Then Exit Sub
Set xMail = Inspector.CurrentItem
xSubject = VBA.UCase$(xMail.Subject)
If (VBA.InStr(xSubject, "RE: ") = 1) Or (VBA.InStr(xSubject, "FW: ") = 1) Then Exit Sub
With xMail
  .Attachments.Add "C:\Users\Desktop\Leonel Davis.vcf"
End With
End Sub

Note: En el código anterior, C:\Usuarios\Escritorio\Leonel Davis.vcf es la ruta del archivo de su tarjeta de presentación que ha guardado, cámbiela según sus necesidades.

5. Luego, guarde y cierre la ventana del código, reinicie su Outlook para activar el código.

6. Ahora, al crear un nuevo mensaje, la tarjeta de presentación especificada se insertará automáticamente como archivo adjunto, vea la captura de pantalla: