Este fórum está sendo desativado

[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.

[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?

[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!





-

[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.

[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!

[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 .

[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 .

[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