Macro para enviar e-mail com corpo de texto variável

Question

Olá pessoal,

Tenho uma planilha com datas, atividades e responsáveis. Estou tentando fazer uma macro que mande um e-mail para o responsável da atividade que estiver perto da data de entrega. Já fiz todo o processo de filtrar por prazo, agrupar as atividades, separar por responsável, etc., mas no momento de enviar a mensagem eu quero que o corpo do e-mail seja as linhas com as atividades pendentes e o prazo em que irá vencer (tipo um ctrl c - ctrl v da planilha do excel para o corpo do outlook). Não quero que o arquivo seja anexado.

A parte da macro que faria isso é a seguinte:

Set OutMail = OutApp.CreateItem(olMailItem)

With OutMail

.To = ActiveSheet.Range("i2").Value

.Subject = "Pendências - Check de metas"

.Body = ActiveSheet.Range("a1", ActiveCell.SpecialCells(xlLastCell)).Select  'este intervalo é o que contém as atividades a serem executadas e o prazo

.Send

(se precisarem eu colo a macro inteira, mas está um pouco grande...ela termina ai, só tem um endsub depois do .send)

Como a macro enviaria a mensagem para várias pessoas, o corpo do e-mail mudaria de acordo com as atividades daquela pessoa.

Alguém manja disso?

Obs.: Tem um esquema de enviar a planilha como corpo  do e-mail, e não como anexo, diretamente pelo excel...algúm sabe fazer isso por macro?

Valeeeu galera...

Answer 1

Olá Leandro,

Para questões sobre aplicações Office baseadas em VBA, posta sua pergunta no fórum abaixo, que é o fórum específico para esse tipo de questão:

http://social.msdn.microsoft.com/Forums/pt-br/vbapt/threads

Espero ter ajudado.

Até mais!!!

Answer 2

Ok Bruno,

obrigado.