Envio de archivo por correo

hola, Doors !

... tengo un combobox... la lista autorizada de jefes
... que en el momento que yo escoja un jefe, y le de click a un boton
... me abra outlook y me envie la hoja que estoy trabajando en ese momento
y que en el destinatorio de outlook, me aparezca la direccion del jefe.

si ya definiste la forma de *vincular* el elemento-jefe seleccionado en el combo y *su* direccion de correo...
revisa el metodo 'SendMail' aplicado a un objeto workbook [p.e.]
ThisWorkbook.SendMail "direccion_de_correo", "asunto del mensaje"

-> otra alternativa es que visites la siguiente direccion [tiene bastantes consejos, ejemplos, plantillas, complementos, etc.]
Example Code for sending mail from Excel
http://www.rondebruin.nl/sendmail.htm

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

On Sep 5, 5:16 pm, Doors wrote:

Saludos,

Amigos, tengo una consulta, tengo un combobox que se llama jefes, en ese
combo tengo la lista autorizada de jefes, como puedo hacer para que en el
momento que yo escoja un jefe , y le de click a un boton que tengo que se
llama enviar solicitud,
me abra outlook y me envie la hoja que estoy trabajando en ese momento y que
en el destinatorio de outlook, me aparezca la direccion del jefe.

Gracias por la ayuda que me puedan brindar!!!

Doors, utiliza el codigo que está en esta página::

http://www.xltoday.net/vba_ejemplos...remail.asp

Con esta macro no es necesario abrir el outlook. No es necesario usar
boton porque la macro se ejecutaria automaticamente
una vez que hagas la seleccion en el combobox.

Te sugiero lo siguiente:
1-Haz la lista de nombres en una columa que es la que va a utilizar el
combobox.
2-En la columna siguiente pon los correos electronicos.
3-A la par de la celda donde el combobox te devuelve la posicion
seleccionada en la lista utiliza la funcion "index" o "indice"
usando el rango de correos y el numero que te devuelve el combobox
para que te ponga en esa celda
el correo electronico de la persona seleccionada.
4-En la macro pones:
strEmail = range("Celda que contiene la funcion "index" o "indice" y
que te va a devolver el correo de la persona seleccionada")
5-Asignas la macro al combobox.

En la declaracion de la variable que esta en la macro agrega una "r" a
"stEmail" para que sea "strEmail"
Dim stEmail As String <- (corregir, falta una r).

David