Hola buenas!
Estoy intentando crear una acción por la cual al hacer click en el botón, access abra un nuevo e-mail de Outlook e inserte en el apartado CCO, todas las direcciones de e-mail de una tabla.
Hasta ahora ya he conseguido que access abra el mensaje de Outlook y agregue una dirección en concreto... pero necesito que agregue todas las de una tabla.
Os presento el código que tengo de momento, lo que me hace falta es el recordset que añada las direcciones de la tabla:
Código:
Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.CreateItem(olMailItem)
Set myRecipient = myItem.Recipients.Add([email protected])
myRecipient.Type = olBCC
myItem.Display
Espero que alguien me pueda ayudar!
Muchas gracias de antemano!