Página 1 de 1
Envio de Mensagem Automática Para E-mail
Enviado: 08 Mar 2018 às 09:48
por CAMILOALVES
Bom Dia!
A planilha em anexo, possui um botão "ENVIAR EMAIL" que a ser acionado transmite a referida planilha para um determinado e-mail, ou seja, necessita de intervenção humana para que seja enviada ao e-mail do destinatário.
SOLICITAÇÃO DE AJUDA: Se possível, gostaria que a referida planilha fosse enviada automaticamente, ou seja, o envio seria ativado sem interferência humana, sendo enviada somente quando os dados das células T6 a T35 estiverem com o status: "EMITIR".
Desde já Agradeço.
Envio de Mensagem Automática Para E-mail
Enviado: 11 Mar 2018 às 16:05
por mprudencio
A pergunta é todos os dados da coluna T devem estar Emitir?
Ou como no seu exemplo vai enviar pq temos emitir na linha 8.
Outra pergunta a planilha só sera enviada se todas as linhas estiverem preenchidas?
Envio de Mensagem Automática Para E-mail
Enviado: 12 Mar 2018 às 09:43
por CAMILOALVES
Prezado mprudencio 11 Mar 2018 às 17:00,
1) Os dados das colunas T são preenchidas automaticamente mediante lógica embutida na planilha;
2) A planilha deverá ser enviada automaticamente independentemente do número de linhas preenchidos.
Porém só devem ser transmitidos para o outlook, os dados nas condições de "N.EMITIR".
Desde já agradeço!
-
Envio de Mensagem Automática Para E-mail
Enviado: 12 Mar 2018 às 21:19
por mprudencio
Essa planilha é preenchida de que maneira?
Em que momento sera disparado o email?
Apos abrir?
Antes de Fechar?
Apos receber os dados recebidos por macros/formulas?
Enfim seu codigo pelo que vc diz esta pronto, logo so precisa saber quando o codigo sera executado.
Envio de Mensagem Automática Para E-mail
Enviado: 13 Mar 2018 às 10:42
por CAMILOALVES
Prezado mprudencio 12 Mar 2018 às 22:19
As Células T6 a T35 são atualizadas automaticamente mediante as seguintes condições:
1) Se "Data Próxima Calibração" - "Data Sistema" > 15, Atualiza as Células T6 a T35 com a Escrita "N.EMITIR".
2) Se "Data Próxima Calibração" - "Data Sistema" < 15, Atualiza as Células T6 a T35 com a Escrita "EMITIR".
A célula da coluna T é alterada de acordo com a data que é inserida na coluna P, portanto sempre que houver essas alterações e os status for igual "EMITIR" a planilha deverá ser enviada automaticamente para o e-mail em questão.
Desde já agradeço, fico no aguardo!
Envio de Mensagem Automática Para E-mail
Enviado: 13 Mar 2018 às 13:56
por mprudencio
Como eu disse para que seja automatico precisa ser levado em consideração algumas regras.
Apos abrir, antes de fechar, a cada alteração na planilha.
Enfim! Quando o codigo sera disparado?
Se for apos abrir é so colocar no evento workbook open
Se for antes de fechar no evento before close
Isso em Esta Pasta de Trabalho.
Se for a cada alteração da planilha no evento Change no modulo da planilha .
Envio de Mensagem Automática Para E-mail
Enviado: 13 Mar 2018 às 15:38
por CAMILOALVES
Prezado mprudencio 13 Mar 2018 às 14:56
A rotina do trabalho é a seguinte:
1º Abasteço a planilha digitando uma determinada data na coluna "P";
2º Existe uma lógica na coluna "R' onde se calcula automaticamente uma data posterior baseado na data inserida na coluna "P";
3º Com base no resultado obtido na coluna "R", o sistema de forma automática faz a avaliação "EMITIR" ou "N.EMITIR".
A SOLICITAÇÃO: sempre que a planilha for aberta e na coluna "T" o status for igual "EMITIR" então dispara os dados de forma automática para o email .
Envio de Mensagem Automática Para E-mail
Enviado: 13 Mar 2018 às 22:41
por mprudencio
Neste caso:
Cole este codigo em Esta Pasta de Trabalho
Private Sub Workbook_Open()
'Seu codigo de enviar o email
End Sub
Sempre que abrir a planilha vai executar o codigo