Envío de correo con macros

hola, Tomás !

1) seria bueno si expones 'la macro' que estas usando por hipervinculos :))

2) [hasta donde se]... para 'manejar a voluntad' los adjuntos externos en correos electronicos desde excel-vba...
es necesario utilizar outlook [NO el 'express'] o... CDO [Collaboration Data Objects]
ejemplos para outlook en: http://www.rondebruin.nl/mail/folder2/files.htm
ejemplos para CDO en: http://www.rondebruin.nl/cdo.htm [necesitaras de 'ligeras' modificaciones] ;)

3) para 'brincar' el aviso de seguridad... va a ser 'indispensable'...
o... 'bajar' el nivel de seguridad en tu servidor de correos [outlook ?] <= poco/nada... 'recomendable' ;)
o... usar la opcion de CDO
o... usar complementos de terceros [como el 'ClickYes' comentado en la pagina de Ron]
-> http://www.rondebruin.nl/mail/prevent.htm

4) para 'evitar' que el correo se envie de manera 'instantanea'... [no se si se pueda por CDO] -?- pero...
o... cambiar las instrucciones .Send por... .Display
o... te 'desconectas' de internet :)) [para que al intento de re/conexion te 'permita' revisar los correos] :D
OJO: NO 'funciona' si vas a usar CDO :-(

5) otras 'alternativas' [y solo por mencionar algunas]...
-> complementos para enviar correos: -> http://www.rondebruin.nl/mail/add-in.htm
-> plantillas para enviar correos: -> http://www.rondebruin.nl/mail/templates.htm

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

__ consulta original __

... un par de problemillas al hacer una macro para enviar un correo.
... una macro que aparece en http://www.rondebruin.nl/sendmail.htm... a traves de Hipervinculos
... el fin... que no me salga el mensaje de seguridad de que se esta enviando un correo.
... problema... que quiero enviarlo con un archivo adjunto y no se como... y tampoco veo como se hace en dicha pagina.
... cualquier sugerencia incluso si es otro tipo de macros pero tiene que cumplir las siguientes condiciones:
- No puede aparecer el mensaje de seguridad
- Permita adjuntar archivos al correo escrito (cuyos datos estan en una tabla)
- No me envie el correo automaticamente sino que solo me lo muestre por si tengo que modficar algo

Muchas gracias. Ya lo tengo más o menos encaminado. He usado la de
Mail_small_Text_Outlook() que es la que mejor se adapta a lo que quiero. La
única cosa que me haría falta saber es que si cuando escribo el cuerpo del
mensaje se le puede dar formato. Te explico el caso.

strbody = "el importe de la factura es:" & vbNewLine & _
Importe & "Euros"

En el cuerpo del mensaje quiero que "el importe de la factura es:" aparezca
en negrita y subrayado y la variable "Importe" en formato #.###,00. No sé
como hacerlo ya que cuando defino la variable le pongo el formato y me lo
recoge la tabla donde se vuelca el dato pero no en el cuerpo del correo
electrónico que es lo que deseo.
Muchas gracias por tu tiempo

hola, Tomás !

... Ya lo tengo... encaminado. He usado la de Mail_small_Text_Outlook() que es la que mejor se adapta a lo que quiero.
... me haria falta... que... cuando escribo el cuerpo del mensaje se le puede dar formato.
strbody = "el importe de la factura es:" & vbNewLine & _
Importe & "Euros"
... quiero que "el importe de la factura es:" aparezca en negrita y subrayado
y la variable "Importe" en formato #.###,00.
... cuando defino la variable le pongo el formato me lo recoge la tabla donde se vuelca el dato
pero no en el cuerpo del correo electronico que es lo que deseo.

1) asumiendo que usas excel 2000 [o superior]... puedes usar para el envio de textos con formato...
-> .HTMLBody = "sentencias con etiquetas HTML" en lugar de usar...
-> .Body = strbody [p.e.]

2) las etiquetas para la 'necesidad' que planteas, serian +/- como sigue:
<B> inicia un bloque con texto en Bold [negritas]
<U> inicia un bloque con texto Underlined [subrrayado]
</U> </B> estas 'eqiquetas' TERMINAN los bloques correspondientes
<BR> es el 'sustituto' para vbNewLine

3) [en resumen] modifica/adapta/cambia/complementa/... tus lineas de codigo con las siguientes:
' en el area de las variables, agrega una para las etiquetas HTML '
Dim Texto_html As String
' contruye el cuerpo con formato +/- como sigue... '
Texto_html = "<B><U> el importe de la factura es:</U></B><BR>" & _
Format(Importe, "#,##0.00") & " Euros."
' inicias la instanciacion del objeto OutLook ... '
' sustituyes la linea con el .Body = strbody por la siguiente: '
.HTMLBody = Texto_html
' continuas con las instrucciones para el envio/presentacion del correo ... '

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

p.d. en la misma pagina de Ron DeBruin -> http://www.rondebruin.nl/sendmail.htm
consulta la seccion de: Outlook object model (body)
los primeros dos enlaces contienen ejemplos variados para envios con formato ;)

Muchas gracias. Es justo lo que necesitaba. Una útlima pregunta. En el texto
pones lo que hay que hacer para negrita y subrayado. ¿donde puedo ver todo lo
que se puede hacer? Es decir, si yo quiero ponerlo en cursiva o colorines u
otra fuente tendré que ponerle algo como lo que expones pero no sé el que
¿hay alguna página donde se pueda ver todo eso? Muchas gracias de nuevo

hola, Tomás !

... pones lo que hay que hacer para negrita y subrayado... donde puedo ver todo lo que se puede hacer?
Es decir, si yo quiero ponerlo en cursiva o colorines u otra fuente tendre que ponerle algo como lo que expones
pero no se el que... hay alguna pagina donde se pueda ver todo eso?

solo utiliza un 'buscador' [google, yahoo, msn, etc.] y 'pregunta' por: -> html tags

si cualquier duda... comentas ?
saludos,
hector.

p.d. solo por poner ejemplos:

HyperText Markup Language (HTML) Home Page
http://www.w3.org/MarkUp/

<html code tutorials>
http://www.htmlcodetutorial.com/

una lista de aprox. 32'300,000 articulos encontrados :))
http://tinyurl.com/p9fn2