Macro de excel para enviar dados de células de email

Hanarge · 12 de fevereiro de 2015

Olá! Como faço para criar uma macro no excel que encaminhasse o e-mail automaticamente, descrito abaixo, utilizando os dados da planilha, também abaixo. O encaminhamento do e-mail tem que obedecer a seguinte condição: o valor da coluna E2 tem que ser > 0 e < 100.

CÓDIGO DO E-MAIL NO VBA

With olMail
.to = "[email protected]<script cf-hash='f9e31' type="text/javascript"> /* */</script>"
.Subject = "ALERTA DE VENCIMENTO"
.Body = " Faltam " & " dado da coluna E2 " & " dias para a solicitação da renovação da " & " dado da colunade B2 " & " de nº " & " dado da colunade C2 " & " .Favor requerer a solicitação."
.Send
End With

David.sps · 13 de fevereiro de 2015

Caro amigo,

creio que algumas colunas estejam ocultas....

Hanarge · 13 de fevereiro de 2015

Desculpa, na correria nem tinha observado e terminei errando tudo. As outras colunas eu terminei ocultando porque são irrelevantes. Na verdade a pergunta ficaria assim:

Como faço para criar uma macro no excel que encaminhasse o e-mail automaticamente, descrito abaixo, utilizando os dados da planilha, também abaixo. O encaminhamento do e-mail tem que obedecer a seguinte condição: o valor da coluna H2 tem que ser > 0 e < 100.

CÓDIGO DO E-MAIL NO VBA

With olMail
.to = "[email protected]<script cf-hash='f9e31' type="text/javascript"> /* */</script>"
.Subject = "ALERTA DE VENCIMENTO"
.Body = " Faltam " & " dado da coluna H2 " & " dias para a solicitação da renovação da " & " dado da colunade B2 " & " de nº " & " dado da colunade C2 " & " .Favor requerer a solicitação."
.Send
End With

Miniaturas anexadas:

Hanarge · 18 de fevereiro de 2015

Será que alguém pode me ajudar com essa macro?

Basole · 19 de fevereiro de 2015

Hanarge, faltou voce indicar a coluna em que estarão os end de emails.

E quer enviar anexos tbem?

Se puder, faça um upload de um modelo de sua planilha com essas informações incluidas, facilita o retorno da breve da solução.

Hanarge · 19 de fevereiro de 2015

Basole, obrigado por responder. Neste caso, eu não quero criar uma coluna com os endereços de e-mails, eu já quero colocar todos esses endereços na própria macro. Assim, quando for verificada a condição, a macro já encaminha o e-mail automaticamente informados na linha do código: to = "e-mail1"; "email2"; "email3".

No caso dos anexos, eu não quero enviar nenhum tipo de anexos. Apenas quero digitar um texto padrão com algumas informações da própria planilha, como na linha a seguir: .Body = " Faltam " & " dado da coluna E2 " & " dias para a solicitação da renovação da " & " dado da colunade B2 " & " de nº " & " dado da colunade C2 " & " .Favor requerer a solicitação."

Fiz também o upload da planilha.

Lic_Ren.xlsx