Access - Envio masivo de informes personalizados por email

Hola a todos.

Tengo una pequeña base de datos en Access 2010 para controlar los ahorros de un grupo de personas. En la misma existe un formulario que sirve de filtro para generar un informe personalizado para cada ahorrante. Si quisiera enviar estados de cuenta a cada ahorrante (como los que envían los bancos mensualmente), tendría que hacerlo manualmente filtrando por ahorrante, generando el informe personalizado y enviándolo por correo uno a uno. Si tenemos más de 100 personas, pues esta acción nos consumiría mucho tiempo.

Lo que necesito es un código para que esto se haga automáticamente de forma masiva, no conozco mucho sobre vba, pero sé que si se puede hacer, el tema es como hacerlo, es por eso que solicito la ayuda de algún buen samaritano que ayude a este pobre ignorante en vba.

Lo ideal sería tener un formulario donde se escoja una fecha de inicio y otra de fin. El mismo formulario tendría un botón para una vez indicado el rango de fechas, ejecutar el envío masivo de los estados de cuenta por correo. El código recorrería la tabla de ahorrantes, registro por registro, generando un informe personalizado y enviándolo al correo que aparece en la misma tabla en formato pdf.

Aquí les adjunto la base de datos con la que estoy trabajando, para que tengan una mejor idea de lo que les estoy hablando, como verán ya el informe esta creado, sería ideal poder usar ese mismo formato.

http://1drv.ms/1EYELm3

Les agradezco de antemano la ayuda que me puedan brindar. Saludos

Hola Gabriel

Puedes mirar los ejemplos de Neckkito, el tiene varias formas de envio masivos de correos, tanto con CDO, con automatización y con SendObject, cuestion que te desidas por que método.
http://siliconproject.com.ar/neckkito/

Saludos.

Gracias Emilio,

Ya he visto los ejemplos de Neckkito y en la parte de envío están muy bien, el problema es que están dirigidos a envío masivos de un mismo informe y que yo lo que necesito es primero generar un informe personalizado por cada persona y luego enviarlo por correo.

Saludos.

La verdad no entiendo por que dices que no te sirve, por ejemplo en el tercero, el tiene un inputbox de asunto, y otro del cuerpo del mensaje, si tu quieres personalizar eso pues tan sencillo de tenerlo en subformulario y escribir lo que lleva cada uno, claro tienes que trabajarlo un poco. es mas le puedes agregar un archivo adjunto personalizado o etc. posibilidades muchas, encontrar un ejemplo que haga lo que quieres con exactitud es dificil, busca con JJJT a ver que tiene el, también con Emilio Sáncha y con Enrique https://sites.google.com/site/jerrmex/descargas

Saludos.

Te pongo un ejemplo diferente a ver si lo comprendes mejor.

Un banco tiene muchos clientes, los clientes tienen cuentas y las cuentas tienen movimientos. Hasta aquí todo muy claro, pero este banco necesita que el sistema que ellos utilizan para llevar el control de los clientes, las cuentas y sus respectivos movimientos, mensualmente genere un archivo pdf con el estado de cuenta de cada cliente y luego se lo envié adjunto en un correo.

Entonces el archivo adjunto será diferente por cada cliente, dependerá de los movimientos que haya realizado este cliente en el transcurso del mes respectivo. Pero el correo si puede ser el mismo (asunto, cuerpo) salvo por el adjunto y la dirección de correo.

El ejemplo de Neckkito explica como enviar un correo por medio de access, de varias formas y hasta hay muy bien. Pero lo que no se como hacer es generar automáticamente un informe personalizado por cada "cliente" y luego adjuntarlo al correo.

Seguiré buscando a ver si puedo encontrar un código parecido. Saludos

eso que tu pretendes no es un correo masivo es un envio individual

eso es, ir recorriendo los clientes , generar el informe , enviar un correo y pasar al siguiente .
la carta o texto a djuntar si es igual para todos , la puedes tener grabada o que se genere a la hora del envio

Ya encontré la solución en esta página viene un ejemplo muy útil, exactamente lo que estaba buscando.

www.proinf.netpermalinkenviar_informes_personalizados

Hola Gabriel,
Yo tengo el mismo problema que tú desde hace tiempo y aún no lo he solucionado.
El enlace que indicas no funciona, ¿podrías indicarme cómo lo has solucionado?, además tampoco tengo muchos conocimientos de VBA.
En mi caso, tengo que envíar a distintos municipios un informe personalizado a cada uno de ellos con el consumo de agua de un periodo.
Muchas gracias, un saludo,

Hola,

Yo resolví el problema con una solución básica, que echa mano de un par de códigos. Antes de empezar debes crear un informe que será el que adjuntaras al correo, este informe a su vez está basado en una consulta que filtra el contenido en base a un criterio, que en mi ejemplo está definido por una variable temporal.

Ejemplo: si tienes un listado de municipios, pues la variable temporal será el nombre o código de uno de ellos, por lo que este será el criterio que filtrará la consulta y esta a su vez el informe. Igualmente puedes hacer variables temporales para guardar una fecha de inicio y otra fecha de cierres (desde y hasta), para adicionalmente filtrar los registro por fechas.

En la consulta, vista diseño, campo MUNICIPIO o CODIGO, pondrás esto:
=[Variables temporales]![Nombre_de_tu_variable]

Las variables temporales para fechas filtrarán el campo de fecha de tu BD, en la consulta la puedes definir así:
>=[Variables temporales]![Fecha1] AND <= [Variables temporales]![fecha2]

Con estas variables temporales puedes filtrar tu informe, ahora vamos a definirlas. Puedes crear un formulario en blanco ingresar un par de cuadros de texto, para introducir el rango de fechas, los nombras con algún nombre, ejemplo TXTDESDE y TXTHASTA, en el evento después de actualizar puedes crear un macro que defina una variable temporal, defines el nombre ejemplo FECHA1 y el valor TXTDESDE, lo mismo con la otra variable. Con esto consigues definir las variables de fecha.

Para definir la variable temporal del MUNICIPIO, debes crear un módulo independiente con este código:


Este módulo crea un procedimiento function, que define una variable temporal, de acuerdo al valor que se le pase.


Volvemos al formulario en blanco con los cuadros de texto para definir el rango de fechas. Aquí podemos personalizar un poco el formulario con algunas herramientas sencillas, en tu BD debes tener una tabla de municipios y sus datos entre ellos el email, puedes agregar un campo boolean (si/no) que se llame ENVIAR_CORREO, si está marcado entra en la lista de los registros a los que se les mandará un estado de cuenta.

Creas una consulta que filtre solo los municipios en los que el campo ENVIAR_CORREO sea TRUE.

En el formulario puedes incluir un cuadro de lista que muestre la consulta que acabas de crear, para visualizar a los municipios a los que se le enviará el correo.

Para finalizar crear un botón que contenga en el evento AL HACER CLIC, el siguiente código:


Este código es obra de NECKKITO, solo le hice algunos cambios, por ejemplo:


El resto es simplemente la acción de enviar el correo con el informe adjunto, avanzando hacia adelante en los registros definidos en el recordset.

Te adjunto una base de datos de muestra con el ejemplo. Espero que te sea de utilidad.

http://1drv.ms/1FgasF7

Nota: si utilizas Outlook como cliente de correo, te dará un molesto aviso por cada correo, al que le deberás dar clic en permitir para que te deje avanzar. La solución más sencilla sería utilizar otro cliente de correo como thunderbird.

Saludos

Sí funciona. yo ya los utilicé en un sistema de mi trabajo. lo único que tienen que hacer es ver el ejemplo e implementarlo.

Gracias Gabriel por tu aportación.

Nota: Outlook te solicita permiso para enviar cada correo

Dicen que usando otro cliente de correo se puede arreglar esta situación.

Gracias Foro.


Saludos

Carlos Jiménez

' PARA ENVITAR EL MENSAJE DE OUTLOOK "UN PROGRAMA DESEA ENVIAR CORREO
'Abrir regedit y buscar el siguiente registro según la versión de Office: Para Office 2007: HKEY_CURRENT_USER\Software\Microsoft\Office\12.0\Outlook\Security
'Para Office 2010: HKEY_CURRENT_USER\Software\Microsoft\Office\14.0\Outlook\Security
'Para Office 2013: HKEY_CURRENT_USER\Software\Microsoft\Office\15.0\Outlook\Security
'3. Crear los siguientes DWORD: PromptSimpleMAPISend : Valor 2 decimal
PromptSimpleMAPINameResolve : Valor 2 decimal
PromptSimpleMAPIOpenMessage : Valor 2 decimal
'*Si existen y están a 1, les ponemos el valor 2.


link:

http://blog.jnc.es/wp-content/uploads/2015/02/Desactivar-mensaje-Outlook-.pdf


:)

Francisco, he modificado el registro y ya no sale el mensaje de Outlook, funciona perfectamente en OUTLOOK 2010.
Muchas gracias.

tienes el access que me puedas facilitar?

hola buenas tardes,
he visto y leido tu consulta y tengo la misma duda....
debo enviar extractos a casa asociado....
ya genere las tablas, las consultas y hasta el informe
solo que en el informe me sale de uno solo tajon las 110 hojas
y necesito enviar cada informe o extracto a cada asociado.
me puedes dar indicaciones de como hacerlo?
te envio el archivo para que lo puedas checkar
cualquier cosa mi numero de cel es +573118487658 y correo [email protected]

gracias

• Extractos2020.rar(1,2 MB)

Hola!!

Que alguien me ayude, el ejemplo que esta en este link ya no lo tengo, lo habia descargado pero tuve que formatear mi equipo y perdi todo

ALGUIEN TIENE ALGO SIMILAR A ESTO?

https://ca.proinf.net/permalink/enviar_informes_personalizados

Al entrar ya no puedo desde mi ordenador... HELPME}1

Tienes el access?