¿Cómo copia oculta a mí mismo en cada correo electrónico Enviar en Outlook 2007?
Abra Outlook 2007.
Mientras mantiene pulsada la tecla "Ctrl", pulse la tecla "F11". Esto abrirá la ventana de VBA.
Haga clic derecho sobre la carpeta "modular" de la ventana en la esquina superior izquierda de la pantalla de VBA y seleccione "Insertar" y luego "Módulo". Esto creará un nuevo módulo para Outlook.
Haga clic en el panel derecho de la ventana para activar la ventana del módulo.
Escriba el siguiente código, en sustitución de "email.myself@mydomain.com" con la dirección de correo electrónico a la que desea que la copia oculta enviada a:
Sub Application_ItemSend privada (artículo ByVal como objeto, Cancel As Boolean)
Dim recibo como Outlook.Recipient
Dim Dirección $
Dirección = "email.myself@mydomain.com"
Septiembre Recibo Item.Recipients.Add = (Dirección)
Receipt.Type = olBCC
Receipt.Resolve
End Sub
Haga clic en "Debug" para activar el menú "Debug".
Haga clic en "Proyecto Compilar" para completar el formulario.
Cierre la ventana para guardar el proyecto VBA y recibirá copias de todos los correos electrónicos enviados.
Enlace al sitio / blog :
Enlace para los foros ( código BB ) :