Saltar al contenido
View in the app

A better way to browse. Learn more.

Ayuda Excel

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

Mails duplicados

publicado

Buenos días de nuevo hoy.

Estoy teniendo problemas con una macro y no logro resolver.

En la macro he creado un módulo que muestra un formulario sí la fecha de la columna "Fecha" es igual al día actual y después envía un mail al destinatario.

El problema es que al hacer dicha comprobación me duplica los mails.

 

Un saludo para todos.

Adjunto macro:

MMailAviso.xlsm

Featured Replies

publicado

Ambas macros, Aviso y EnviarMail, recorren la hoja, de ahí los duplicados.

La pregunta es, ¿Deseas preguntar por cada correo a enviar o solo una vez antes de preguntar por la fecha?

publicado
  • Autor

Hola Antoni;

Primero gracias por responder. 

En cuanto a la pregunta, prefiero que me pregunte si quiero enviar y te explico porqué. 

Me gustaría revisarlos primero ya que por error podría enviar a algún cliente  que en ese momento no me gustaría enviar.

Es posible (?).

Te lo agradezco. 

publicado
  • Autor

Hola Antoni;

-La macro ahora genial, te lo agradezco.

Había intentado como comentaste quitar el For pero no me iba.

For f = 2 To Final

Me puedes explicar brevemente este procedimiento. Ya he visto en alguna ocasión algo parecido y no lo comprendo bien.

Sub EnviarMail(Fila As Long): On Error Resume Next

 

EnviarMail Fila 

Un abrazo y muchísimas  gracias por todo.

Bo día.

publicado

¿Qué es lo que no entiendes? 

 

EnviarMail, es un procedimiento que espera un parámetro:  La fila de donde sacaremos los datos, lo puedes llamar también así Call EnviarEmail(Fila) o incluso así Call EnviarEmail(Fila:=Fila), en este caso el parámetro del procedimiento y la variable que le pasamos coincide, pero no tiene por que ser así.

publicado
  • Autor

Gracias Antoni  por la explicación. 

Ahora lo entiendo, inclusive me has puesto tres supuestos. 

No hay mas preguntas ????

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.