............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

enviar correo de la celda que este seleccionada

Ver el tema anterior Ver el tema siguiente Ir abajo

enviar correo de la celda que este seleccionada

Mensaje por GEAR el Jue Ago 11, 2011 5:29 pm

Hola que tal a todos, bueno soy nueva en el foro y como vi algunos temas que me han ayudado decidi registrarme para poder aportar mi ideas y que tambien me ayuden.

Bueno el problema es el siguiente (como no soy bueno en programacion) copie una macro de una pagina (spreadsheetpage.com), y bueno algo entendi del codigo y que tambien tenia que tener activado una funcion del outlook; lo que hace es enviar correos por medio de outlook a las personas que se encuentran en la columna que seleccione como mail, lo que no logro hacer es que haga esto pero de acuerdo a la celda que seleccione y no que me envie a todas las personas que estan en la columna (en el codigo se encuentra con un For de tantos a tantos y no se como cambiar eso), ya que en este archivo se iran agregando datos. Espero me puedan ayudar señores expertos. Les adjunto el archivo

Agradezco su ayuda de antemano y por los temas que se encuentran en este foro que son muy buenos e interesantes.
Archivos
correo.xlsm No tienes los permisos para descargar los archivos.(27 KB) Descargado 42 veces

GEAR

Masculino Cantidad de envíos : 13
Edad : 30
Ciudad - Pais : Coacalco-Mexico
Version de Excel : 2007
Fecha de inscripción : 11/08/2011

Volver arriba Ir abajo

Re: enviar correo de la celda que este seleccionada

Mensaje por Cacho R el Jue Ago 11, 2011 7:17 pm

Hola! Gear.
El que muestras no es un método que -particularmente- me satisfaga.
Pero si lo que muestras te funciona, entonces:

a) Reemplaza:
For r = 5 To 7

por:
Dim C As Range
For Each C In Selection
r = C.Row

b) Reemplaza:
Next r

por:
Next C

Saludos, Cacho R.
avatar
Cacho R
Moderador
Moderador

Masculino Cantidad de envíos : 210
Ciudad - Pais : Buenos Aires
Version de Excel : Desde Multiplan (pre-Excel) hasta 2010
Fecha de inscripción : 29/06/2011

Volver arriba Ir abajo

Re: enviar correo de la celda que este seleccionada

Mensaje por GEAR el Lun Ago 15, 2011 11:39 am

Buenos días Cacho R Gracias por tu respuesta pronta, ya realice los cambios que me sugeriste y quedo de fabula no cabe duda que hay gente experta y entiende a la perfección esto; aunque solo que cuando realice algunas pruebas en algunos campos me salia un mensaje que argumentos no validos por outlook y analizando descubrí que eran algunas palabras que tienen comillas en la columna TAG; por que si se las quito si me crea en correo pero si se las vuelvo a poner no lo hace, cual seria su corrección o método para admitir esos caracteres si eres tan amable aunque hasta el momento va genial.


Saludos Gerardo.

GEAR

Masculino Cantidad de envíos : 13
Edad : 30
Ciudad - Pais : Coacalco-Mexico
Version de Excel : 2007
Fecha de inscripción : 11/08/2011

Volver arriba Ir abajo

Re: enviar correo de la celda que este seleccionada

Mensaje por Cacho R el Lun Ago 15, 2011 8:50 pm

Me alegra que hayas encauzado el tema principal.

En cuanto a este detalle que comentas, no te estoy entendiendo... ¿Alguna de las celdas del archivo que has subido tiene esa característica que mencionas?

¿En que línea del código se "pincha" la macro?

Veremos.
avatar
Cacho R
Moderador
Moderador

Masculino Cantidad de envíos : 210
Ciudad - Pais : Buenos Aires
Version de Excel : Desde Multiplan (pre-Excel) hasta 2010
Fecha de inscripción : 29/06/2011

Volver arriba Ir abajo

Re: enviar correo de la celda que este seleccionada

Mensaje por GEAR el Mar Ago 16, 2011 11:47 am

Que tal Cacho R. buen dia, bueno lo que quiero decir es que la columna G de la tabla esta el campo llamado TAG en el cual se pone un mensaje para tal caso y en algunos mensajes contienen comillas para algunas palabras, entonces a la hora de seleccionar esa fila que contiene el mensaje con comillas no me crea el correo y me pone un mensaje que dice lo siguiente 'Argumento no valido en la linea de comandos. compruebe el modificador que esta usando'; en cambio en las otras filas que no contiene comillas en el mensaje si crea el correo.

Te adjunto el archivo para una mejor observación y gracias de nuevo por tu ayuda.

Saludos Gerardo.
Archivos
correo.xlsm nueva versionNo tienes los permisos para descargar los archivos.(28 KB) Descargado 35 veces

GEAR

Masculino Cantidad de envíos : 13
Edad : 30
Ciudad - Pais : Coacalco-Mexico
Version de Excel : 2007
Fecha de inscripción : 11/08/2011

Volver arriba Ir abajo

Re: enviar correo de la celda que este seleccionada

Mensaje por Cacho R el Mar Ago 16, 2011 12:34 pm

Intenta agregando un Sustitute más:

Subj = Application.WorksheetFunction.Substitute(Subj, " ", "%20")
Msg = Application.WorksheetFunction.Substitute(Msg, " ", "%20")
Msg = Application.WorksheetFunction.Substitute(Msg, vbCrLf, "%0D%0A")
Msg = Application.WorksheetFunction.Substitute(Msg, """", "''")

Saludos, Cacho R.
avatar
Cacho R
Moderador
Moderador

Masculino Cantidad de envíos : 210
Ciudad - Pais : Buenos Aires
Version de Excel : Desde Multiplan (pre-Excel) hasta 2010
Fecha de inscripción : 29/06/2011

Volver arriba Ir abajo

Re: enviar correo de la celda que este seleccionada

Mensaje por GEAR el Miér Ago 17, 2011 2:02 pm

Hoa que tal buen dia Cacho R. muchas gracias por tu ayuda parece que era algo tan sencillo y para mi algo complicado jejeje pero bueno espero poder seguir aprendiendo, solo una cosa y no se si realmente se pueda hacer con macros, mi duda es que así como se crea el correo con el contenido del mensaje se puede insertar todo esto es una planilla de outlook es decir no se si desde outlook se necesite crear o configurar la plantilla; un ejemplo, digamos que una la planilla es una tabla como las de excel, y con la información que se esta tomando si se puede inserta esta en ciertos cuadros de la tabla o ya sea planilla, digo aun no tengo una planilla definida pero mi interesa saber si se puede hacer esto espero explicarme bien.


Saludos y nuevamente gracias por tu ayuda.


Gerardo

GEAR

Masculino Cantidad de envíos : 13
Edad : 30
Ciudad - Pais : Coacalco-Mexico
Version de Excel : 2007
Fecha de inscripción : 11/08/2011

Volver arriba Ir abajo

Re: enviar correo de la celda que este seleccionada

Mensaje por Cacho R el Miér Ago 17, 2011 4:32 pm

Te sugiero que cuando tengas delineada -un poco- mejor esa idea de "plantilla de outlook", abras un nuevo tema sobre ese particular.
avatar
Cacho R
Moderador
Moderador

Masculino Cantidad de envíos : 210
Ciudad - Pais : Buenos Aires
Version de Excel : Desde Multiplan (pre-Excel) hasta 2010
Fecha de inscripción : 29/06/2011

Volver arriba Ir abajo

Re: enviar correo de la celda que este seleccionada

Mensaje por GEAR el Jue Ago 18, 2011 8:00 pm

Hola Cacho R. gracias por tu ayuda y tiempo, y en cuanto a lo de la planilla seguiré el consejo en cuanto lo tenga bien establecido lo pongo en el foro.

Gracias y Saludos.

GEAR

Masculino Cantidad de envíos : 13
Edad : 30
Ciudad - Pais : Coacalco-Mexico
Version de Excel : 2007
Fecha de inscripción : 11/08/2011

Volver arriba Ir abajo

Re: enviar correo de la celda que este seleccionada

Mensaje por Cacho R el Jue Ago 18, 2011 9:06 pm

De acuerdo.
Saludos, Cacho R.
avatar
Cacho R
Moderador
Moderador

Masculino Cantidad de envíos : 210
Ciudad - Pais : Buenos Aires
Version de Excel : Desde Multiplan (pre-Excel) hasta 2010
Fecha de inscripción : 29/06/2011

Volver arriba Ir abajo

Re: enviar correo de la celda que este seleccionada

Mensaje por clauxis7531 el Miér Nov 23, 2016 12:10 pm

Gracias!!! Son unos capitos.... 2016 y me ayudaron mucho!!!

clauxis7531

Femenino Cantidad de envíos : 1
Edad : 28
Ciudad - Pais : Perú
Version de Excel : 2010
Fecha de inscripción : 23/11/2016

Volver arriba Ir abajo

Re: enviar correo de la celda que este seleccionada

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.