Philidor Valdivia

Encontré la solución. Tenía que agregar este código dentro del bucle de los destinatarios y no después. '' If rs1.BOF And rs1.EOF Then Exit Function Else Do While Not rs1.EOF CC = rs1!DestCC & "; " rs1.MoveNext Loop oMail.CC = CC End If ''

Fabián debes activar la opción de totales de los campos en una consulta y traer loa dos campos, y en la fila de fecha seleccionar la opción max. Ejecutalo de esta manera y me cuentas.

Ya lo solucione, había que poner la dirección del mismo campo, es decir, tabla y campo.

Guadalupe, al parecer no han respondido tu pregunta, espero poder ayudarte. Te recomiendo utilizar la fórmulas para esto, yo lo haría con la función concatenar, Al lado de la base puedes realizar el primer paso: Concatenar: primero entrada o salida,...

Carlos, Encontré esta barra de progreso hace algún tiempo... Te adjunto el código y el archivo con el formulario... Solo debes importar formulario y agregarlo a tu archivo, y poner el código que quieres que ejecute en las partes señaladas... Private...