Por favor que alguin me diga lo que hago mal

Denos
01 de Diciembre del 2004
Dim uno As Object
Dim dos As Object
Dim tres As Object

Set uno = CreateObject("outlook.application")
Set dos = uno.GetNameSpace("MAPI")
Set tres = uno.CreateItem(0)
tres.BCC = "Dirección de correo cualquiera"
tres.Subject = "Asunto cualquiera"
tres.Body = "Texto del correo ..."
tres.Send

Luis Atondo
01 de Diciembre del 2004
Que es lo que te muestra o que no hace???

lo unico que podria ser es que no tengas instalado el outlook. y activada una cuenta de correo en el....

a mi me funciono bien el tu codigo...

Denos
01 de Diciembre del 2004
Me da un error 429 en tiempo de ejecucion y me dice
El componente ActiveX no puede crear el objeto

Luis Atondo
01 de Diciembre del 2004
Pero si tienes la cuenta en el outlook para que le de salida al correo??

Denos
01 de Diciembre del 2004
Si tengo una cuenta con la que trabajo para enviar correos desde el outlook.