Adicionando intervalo no envio de e-mails
Recebi algumas consultas se seria possível adicionar um intervalo no envio dos e-mails de meu post anterior. Sim, claro que é possível, basta inserir este pequeno código nas macros. Private Declare Sub AppEspera Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long) Public Sub Pausa(PausaEmSegundos As Long) Call AppEspera(PausaEmSegundos * 1000) End Sub Para chamar ele de se script, adicione o texto abaixo no local onde deseja adicionar a pausa: Pausa 3 ‘ Sendo que…(read more)