¿Cómo puedo copia oculta a mí mismo en cada correo electrónico que enviará en Outlook 2007?

Microsoft lanzó Outlook 2007 para las ventas al por menor al final de enero de 2007. Hay muchas mejoras con respecto a las versiones anteriores de Outlook, incluyendo una barra de tareas que muestra las próximas citas del usuario y las tareas activas, mejores vistas de la agenda, nuevos filtros anti-phishing, posibilidad de añadir una imagen o logotipo de la empresa a un contacto y muchos más. Incluido en la nueva versión también son nuevas características programables que permiten la programación de más de profundidad utilizando Visual Basic para Aplicaciones (VBA).

Instrucciones

1 Abrir Outlook 2007.

2 Mientras mantiene pulsada la tecla "Ctrl", pulse la tecla "F11". Esto abrirá la ventana de VBA.

3 Haga clic derecho sobre la carpeta "Módulo" en la ventana superior izquierda de la pantalla VBA y elegir la opción "Insertar" y luego "Módulo". Esto creará un nuevo módulo para Outlook.

4 Haga clic en el panel derecho de la ventana para activar la ventana del módulo.

5 Escriba el siguiente código, en sustitución de "[email protected]" con la dirección de correo electrónico a la que desea tener la copia oculta envió:

Private Sub Application_ItemSend (artículo ByVal como objeto, Cancel As Boolean)

Recibo tenue Como Outlook.Recipient
Dim Dirección $

Dirección = "[email protected]"

Set Receipt = Item.Recipients.Add(Address)

Receipt.Type = olBCC
Receipt.Resolve

End Sub

6 Haga clic en "Test" para activar el menú "Test".

7 Haga clic en "Proyecto de Compilación" para compilar el módulo.

8 Cierre la ventana de VBA para guardar el proyecto y ahora recibirá copias de todos los correos electrónicos enviados.

Consejos y advertencias

• Puede configurar copias ocultas a tantas personas como desee, y puede alterar el código VBA para agregar nuevos destinatarios o eliminar en cualquier momento.
• Una vez que se guarda el código, la copia oculta entrará en vigor hasta que se elimine el código.