Boa Tarde Caros Colegas do Forum.
Preciso de uma grande ajuda de vocês.
Tenho uma planilha que estou colocando em anexo que envia emails automaticamente pelo excel, mas preciso adaptar algumas informações nela.
Como eu peguei de outra pessoa eu não sei fazer esta adaptação.
Vocês podem me ajudar por favor ?
- preciso enviar com copia; "o meu teste não esta enviando acho que estou usando a função errada"
- preciso colocar uma descrição dentro do email e uma assinatura, " no meu teste o email vai certinho só que sem nenhuma descrição nem mesmo assinatura, preciso colocar"
- E finalmente a pior parte, que meu amigo e eu já nos matamos para tentar arrumar e nada, toda vez que a macro roda, o Outlook pede permissão para enviar o email já desabilitamos todas as informações do Outlook mas ele continua aparecendo a mensagem, também coloquei uma copia da msg que aparece no anexo.
Agradeço se alguém puder me ajudar a solucionar estas duvidas espero em breve ser tão bom qto vcs.
Abraços.
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Dias2011,
Boa Noite!
Eu costumo utilizar o código abaixo para envio de e-mail pelo Outlook. Creio que seria melhor você adaptar a sua necessidade e utilizar dessa forma.
Sub EnviarEmail()
Dim olApp As Object, olMail As Object
Set olApp = CreateObject("Outlook.Application")
Set olMail = olApp.CreateItem(0)
olMail.Subject = "Teste1" 'Campo Assunto
olMail.Body = "Teste2" 'Campo referente a mensagem que se quer enviar
olMail.To = "c005388;f046779" 'Matrículas dos destinatários
olMail.cc = "F114170" 'Campo Com cópia
olMail.Attachments.Add "C:/CONFIG.SYS" 'Arquivo a inserir
olMail.Display 'Exibição
End Sub
Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)
Atenciosamente
Wagner Morel
Bom Dia Wagner, Obrigada pela resposta
Mas a forma que vc me enviou eu não consigo fazer uma copia do arquivo apenas da planilha que eu quero e sim o arquivo inteiro, e o meu arquivo atual é muito grande se for para toda vez ele enviar completo vai ficar muito pesado.
E eu tbm não gostaria que aparece-se o Display para que eu veja oque esta sendo enviado, gostaria do jeito que está na minha programação mesmo.
Só que o unico problema é que eu não sei fazer a modificação de uniar a sua programação com a minha 
e o que vc me enviou e exatamente o pedaço que eu preciso, se der para apenas enviar a planilha que eu preciso e não o arquivo inteiro eu até descarto a minha programação e uso a sua. Vc poderia me ajudar?
Abraços
Daniela
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Daniela,
Bom Dia!
No momento estou meio sem tempo (no trabalho) para implementar a solução para você. Todavia, aqui vão algumas dicas:
1 - Antes de começarem os códigos alusivos ao E-mail (que lhe enviei) você deve fazer um código (talvez o seu próprio) de modo a salvar apenas a Plan que você quer enviar em alguma pasta onde o código de envio do E-mail vai pegar esse arquivo (com a Plan única).
2 - Para não exibir o e-mail e o mesmo ser disparado automaticamente, basta substituit o Display por Send.
Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)
Atenciosamente
Wagner Morel
Wagner Obrigada, vou tentar modificar aqui e qualquer coisa eu te grito.
Abraços.
Daniela
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel