Enviar Planilha Via E-mail

[Guest - Rodrigo -]

Bom dia,

Preciso enviar uma planilha que atualizo diariamente para 02 destinatários fixos.

Consegui através do código abaixo enviar para 01, mas não consigo acrescentar o segundo destinatário e nem colocar alguma mensagem fixa no e-mail. Como consigo fazer isso??

Segue abaixo o código utilizado:

sub auto_close ()

ActiveWorkbook.SendMail "xxx@xxx.com.br" , "assunto do e-mail"

end sub

Obrigado pela ajuda....

Rodrigo

[Guest Rogerio Calbo (rcalbo@gmail.com)]

Bom dia,

Preciso enviar uma planilha que atualizo diariamente para 02 destinatários fixos.

Consegui através do código abaixo enviar para 01, mas não consigo acrescentar o segundo destinatário e nem colocar alguma mensagem fixa no e-mail. Como consigo fazer isso??

Segue abaixo o código utilizado:

sub auto_close ()

ActiveWorkbook.SendMail "xxx@xxx.com.br" , "assunto do e-mail"

end sub

Obrigado pela ajuda....

Rodrigo

Carinha eu utilizo este codigo e funciona perfeitamente.

Sub EnviaEmail()

ActiveWorkbook.SendMail Array("email1@xxx.com", "email2@xxx.com", "email3@xxx.com"......etc....), _

"Teste de email"

End Sub

Espero ter te ajudado