Excel - Crear macros para enviar un correo con un rango de datos

 
Vista:
sin imagen de perfil
Val: 3
Ha aumentado su posición en 10 puestos en Excel (en relación al último mes)
Gráfica de Excel

Crear macros para enviar un correo con un rango de datos

Publicado por juan (2 intervenciones) el 18/03/2019 20:39:56
Estoy intentando crear una macros para enviar correos con un rango seleccionado, y para el asunto utilizar algunas de las cedas seleccionadas para crearlo, al igual que el cuerpo del correo, mi problema es que no sé como utilizar ciertas celdas del rango seleccionado.

Adjunto ejemplos:



Capture

T seria el titulo
C cuerpo del correo


Capture

Con las referencias de ciertas celdas del rango seleccionado

Muchas gracias de antemano.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Antoni Masana
Val: 4.908
Oro
Ha mantenido su posición en Excel (en relación al último mes)
Gráfica de Excel

Crear macros para enviar un correo con un rango de datos

Publicado por Antoni Masana (2477 intervenciones) el 19/03/2019 13:03:25
Como no se como tienes la macro no puedo poner el ejemplo con código.

La línea de código seria algo así

Si la celda de la columna B no esta vacía guarda en la variable DC el contenido de la celda B.

Me explico como creo que debe funcionar: Al tener las celdas B6, B7 y B8 combinadas solo la primera tiene el valor y las otras están vacías.
Cuando lea la fila 6 el DC tomara el valor de B6.
Cuando lea la fila 7 la celda B7 esta vacía y DC conserva el valor anterior.
Cuando lea la fila 8 la celda B8 esta vacía y DC conserva el valor anterior.
Cuando lea la fila 9 la celda B9 tendrá un nuevo valor y DC tomara el valor de B9.

Este planteamiento es teórico y falta probarlo.

Saludos.
\\//_
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 3
Ha aumentado su posición en 10 puestos en Excel (en relación al último mes)
Gráfica de Excel

Crear macros para enviar un correo con un rango de datos

Publicado por juan (2 intervenciones) el 19/03/2019 23:12:27
Actualmente uso este codigo

1
2
3
4
5
6
7
8
9
10
11
12
13
14
With Selection
 
    With ActiveSheet.MailEnvelope
       .Item.To = ""
       '.Item.cc = ""
       .Item.Subject = "xxx"
       .Introduction = "xxxxxxx"
       .Item.Send
    End With
 
End With
 
Next i
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar