Macro para enviar hoja via E-mail

2 envíos / 0 nuevos
Último envío
JoaoM
Imagen de JoaoM
Offline
última acción: Hace 1 año 3 meses
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntos
alta: 15/12/2011 - 23:46
Puntos: 3040
Macro para enviar hoja via E-mail

Hola amig@s, nuevamente aquí

Por primera vez, iba a usar esta macro para enviar una hoja por mail y ni siquiera me dejo cambiar de dedo, jejejej.

ME da error de compilación,El Error me puso de espaldas y me cogió porque yo en estos menesteres, como lo he dicho antes, ni para cambiar una tecla.

El adjunto esta con la macro para enviar, coloque algunos (pocos) comentarios para que se entendiera de que correo (mail) enviar y cuál va a recibir, lo que me falta es SABER donde escribo la descripción.

Ya tengo donde coloco el asunto y algo mas, me falta eso, la descripción.

Advierto que NO TENGO outlook no instalo ni instalare, JAMAS ME HA GUSTADO outlook, JAMAS, ¿porque? no lo sé pero no me gusta, al instalar Windows o Office siempre lo quito o no lo instalo NUNCA, por eso quiero enviar el mail desde Gmail o yahoo.

Podría alguien entendido hacer que esta macro funcione? dejo libro contentivo de dicha macro.

Gracias

AdjuntoTamaño
File enviar_coreo_via_gmail.xlsm18.58 KB

Etiquetas: 

pacomegia
Imagen de pacomegia
Offline
última acción: Hace 3 días 2 mins
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntosadministrador
alta: 27/12/2006 - 23:26
Puntos: 11175
activa la referencia a CDO

Espero que la contraseña de tu cuenta de hotmail que has puesto en esta captura de imagen sea falsa

Supongo que te refieres al cuerpo del mensaje. Es la propiedad .TextBody que tienes comentada, quita la comilla de delante y asígnale valor con el texto que quieras.

 

Sobre el error que se produce, es porque Excel no sabe qué es eso del CDO que intentas crear, no se lo has dicho aún.

tal y como tienes tu código, lo más sencillo es que añadas una referencia en tu proyecto VBA a la biblioteca de objetos de CDO. y esto se hace de la siguiente manera:

Editor de VBA>Herramientas>Referencias

Ahí localiza y activa la referencia a "Microsoft CDO for windows 2000 library"  (igual en tu equipo es ligeramente diferente)

activar referencia a dll de CDO para enviar emails desde VBA

 

 

 

 

------
Ya sé Excel, pero necesito más.