Notifications
Clear all

Enviar e-mail Automático com algumas regras

2 Posts
2 Usuários
0 Reactions
789 Visualizações
(@palermo)
Posts: 4
New Member
Topic starter
 

Galera,

Tenho uma macro que envia e-mails de forma automática através de uma rotina automática que roda de hora em hora.
porem notei que algumas pessoas copiaram a mesma e estão enviando através de outro endereço de e-mail.

Preciso criar uma condição ou validação para quando for realizar o envio, essa macro valide o e-mail da pessoa que está enviando o relatório.

Pensei em duas opções, inserir uma senha para envio ou então validar o usuário que esta logado na máquina, mas isso não bastaria.

Preciso mesmo é validar o e-mail da pessoa que está enviado o relatório.

alguém sabe me dizer se isso é possível?

podem me dar esta ajuda?

 
Postado : 04/06/2016 10:40 pm
(@mprudencio)
Posts: 2749
Famed Member
 

Tente algo assim

dim remetente as string

rementente = range ("A1").value ' escolha uma celula qualquer digite seu email e oculte

If remetente = seu email then

aciona a macro

end if

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 07/06/2016 11:39 am