VBA - Envio automático de Email pelo Excel.
HTML-код
- Опубликовано: 10 дек 2024
- Quer saber mais de Excel e ser valorizado no mercado de trabalho e poder ganhar salários maiores?
Conheça meu curso Excel Essentials
yeraexplica.co...
ACESSE MEU INSTAGRAM PARA MAIS CONTEÚDOS:
/ yeraexplica
Nessa aula você vai aprender a enviar emails diretamente do Excel. Podendo automatizar envio de relatórios com os filtros já definidos para cada cliente ou área.
A planilha utilizada para esta aula está disponível para download aqui:
bit.ly/2X2mfsC
************ Comunidade Yera de Excel *******
Faça parte dessa comunidade dinâmica e tenha conteúdos exclusivos e atualizados semanalmente
pay.kiwify.com...
*************************************************
****** OUTROS VÍDEOS **************
Tabela Dinâmica, Gráfico e Segmentação de Dados. Criando o seu painel
• Tabela Dinâmica, Gráfi...
Dashboard - Episódio 01 - Plano de Fundo e Histórico de Faturamento
• Dashboard - Episódio 0...
VBA e Macros - O que é? Por onde começar?
• VBA e Macros - O que é...
************************************
Year, sensacional seu método de explicação! Parabéns! Muito Bom!
Yera, talvez você não imagine o impacto e a diferença que um vídeo como esse pode fazer na carreira de um profissional, muito obrigado pelo apoio!
Consegue me ensinar a colar a seleção como imagem no corpo do email? Pois o dashboard que eu possuo é muito pesado e ao enviar a seleção por email fica muito pesado, de modo que o outlook não envia o conteudo
Muito TOP meu amigo. Funciona perfeitamente. Excelente.
Valeu Rodrigão! Sucesso!
Obrigado pelo video, vc ensinou de forma simples e pratico.
Valeu Raimundo! Grande abraço!
Excelente conteúdo! Ajudou muito, não só o vídeo mas também respostas dos comentários. Parabéns!
Valeu!!
Expetacular!
Valeu Leandro! Sucesso!
Obrigado pelo compartilhamento de seu conhecimento.
Valeu Rodrigo! Abração!
Espetacular!!!!! Monstro da Didática
Valeu Bernardino! Abração!
Bom dia professor, ótima aula parabéns, uma dúvida
No caso se eu quero enviar a planilha como anexo como faço?
Cara...parabéns
Valeu Rogério! Abraço!
Boa dica mas poderia ter ensinado a enviar anexo, com cópia para e cópia oculta também como colocar assinatura. Valeu obrigado.
Valeu pelo feedback meu caro! Vou abordar esse tema em Live para ensinar o que faltou. Abraço!
@@YeraExplicame inscrevi Aguardando a live obrigadão.
Demais!!!! Muito show!!!
Valeu Cleomilton! Abraço!
Excelente!
Valeu Edison! Abraço!
Bom dia! Parabéns pela explicação, como faço pra enviar pra mais de um e-mail? E preciso encaminhar apenas um filtro como faria?
Excelente conteúdo e excelente didática, fiquei só com uma dificuldade, quando protejo a planilha a macro não roda, fala que o e-mail não pode ser enviado com planilha protegida, como acertar este detalhe professor?
Eita piá bÃo!!
Valeu Vanderson!! Abraço!
Nossa sensacional, parabéns pela explicação.
Caso eu precise anexar o próprio arquivo no email, eu consigo via código?
Fala Eduardo! Seguindo a lógica desse exemplo, você pode usar o comando
ActiveSheet.MailEnvelope.Item.attachments.Add (ThisWorkbook.FullName)
que ele irá anexar o próprio arquivo excel sendo utilizado no email.
Só cuidado para que esse código não seja executado em várias repetições, porque cada vez que executar essa linha, ele irá anexar o arquivo novamente.
Grande abraço!
Adorei o video, sensacional !!! Alguém sabe como faço para enviar para várias pessoas ?
Opa Michel! Obrigado. Pra mandar pra mais gente é só você ir colocando ";" (ponto e vírgula) e os próximos emails como se fosse no outlook normal. por exemplo email1@provedor.com;email2@provedor.com;email3@provedor.com e etc.. Abraço. Sucesso!
@@YeraExplica Maravilha, muito obrigado. Consegui automatizar minha planilha. Eu só queria concatenar o assunto de acordo com o mês que estou enviando a informação. Eu já tenho a célula com a data, como faço para aparecer no assunto do e-mail ?
@@michelsoubar9043 maravilha meu caro. Pra juntar essa informação você pode alterar a parte da linha item.subject = "Meu assunto"
Se você quer colocar por exemplo o conteúdo da célula A1 junto, você pode colocar dessa forma:
item.subject = "Meu assunto " & worksheets("ABADAPLANILHA").range("A1")
só lembra que se você tem alguma data nessa célula, você precisa formatar o texto, caso contrário o excel irá colocar o número que aquela data representa. Então se você tem a data na célula A1 e quer concatenar, você pode colocar assim:
item.subject = "Meu assunto " & format(worksheets("ABADAPLANILHA").range("A1"), "dd/mm/yyyy")
Só lembra de editar o "ABADAPLANILHA" para o nome da sua planilha.
Abração, sucesso!
@@YeraExplica Sensacional, você é muito Top. Simplesmente automatizei toda minha planilha que prenchia e enviada de forma totalmente manual. Muito Obrigado.
Top demais Michel! Sucesso!
bom dia,
Ótimo tutorial, parabéns!
Tenho uma dúvida, preciso coletar informações de duas abas da planilha e enviar no mesmo e-mail, como faço para selecionar as células de uma aba, depois unir com as células selecionadas de outra aba e enviar no e-mail?
Opa Diego, obrigado meu caro! Então, existem várias maneiras de enviar um email pelo VBA. Essa daí que eu mostrei é bastante simples mas realmente também mais "limitada", porque o corpo do email vai ser o que você tem selecionado. Então funciona bem para quando você tem um intervalo só pra colocar no email. Você pode montar o seu "corpo do email" também dessa outra forma que eu mostro nesse outro vídeo ruclips.net/video/sXyODGdEHa4/видео.html ou ainda pesquisar sobre o termo "mail item.send vba" que você encontra outros vídeos de VBA mesmo para essa customização. Abração! Sucesso!
Parabéns!
Poderia fazer uma aula para automatizar email utilizando o office 365?
Vlw obrigado!
Opa Mauro, obrigado!
Nesse vídeo aqui estou utilizando o Office 365. Deixei alguma dúvida em alguma parte?
Abraço!
Simples e direto isso que preciso... Ótima explicação
Terá só tenho uma pergunta, tenho uma planilha com checkboxers onde devo enviar email somente quando selecionado
Ou seja, quando selecionado envia o email, mas antes aplica um filtro em um relatório cópia os dados.do relatório e cola no corpo do email.
Parecido com o seu da até para adaptar, porém onde trabalho o email usado é o Outlook 365, oi seja, somente web não tem o Outlook desktop..
Esse código funciona para este serviço?
Opa Claudemir, show de bola!
Quanto ao Office 365:
Nesse exemplo que eu fiz, o excel vai usar o aplicativo Outlook, então só depende da conta configurada no outlook.
No meu caso, eu configurei até mesmo uma conta gmail no outlook (que nada mais é do que um "portal" pro email).
Então pra você, eu sugiro tentar configurar o outlook com a conta que você tem, e aí esse código vai funcionar.
Se não tiver como usar o aplicativo do outlook, aí você vai ter que partir para outra solução (pode ser em VBA mesmo), mas aí é outro código.
Abração.
Excelente... comecei a estudar o VBA e já está me ajudando.
Só uma dúvida, no caso dos e-mails, ao invés de eu deixar fixo no código, como eu poderia fazer referência pra uma celular, que puxaria o e-mail via procv?
Opa Fabio! Show de bola!
Tem várias maneiras de usar o valor de uma célula. Uma forma prática é colocar o que tem dentro dessa célula numa váriavel para usar no código. Por exemplo.
conteudoDaCelula = worksheets("ABA_DE_DADOS").range("A1")
Nessa linha de código, o VBA vai jogar o que tiver de conteúdo na célula A1 da aba "ABA_DE_DADOS" para dentro da variável conteudoDaCelula
E aí você pode usar essa variável para o restante do seu código.
Abraço!
@@YeraExplica desculpa perguntar novamente...
com este código que você indicou, eu substituo a linha activesheet.mailenvelope.item.to por ele?
Opa Fabio! Teria que fazer o código ficar mais ou menos assim:
Vamos supor que o email que você quer pegar está na célula A1.. aí o código ficaria.
conteudoDaCelula = worksheets("ABA_DE_DADOS").range("A1")
activesheet.mailenvelope.item.to = conteudoDaCelula
Abraço!
Obrigado, deu certo!
@@FabioSantos08 sei que é antigo, mas como você conseguiu incluir uma lista de emails em outra aba para ele ler de acordo com o e-mail para cada item selecionado?
Excelente aula meu amigo, muito bom mesmo. Como eu faço para inserir um e-mail como "em cópia" para mandar para mais pessoas?
Valeu meu caro! Pra colocar o em cópia você pode inserir mais uma linha com esse comando antes da linha do SEND
ActiveSheet.MailEnvelope.Item.CC = "email@provedor.com"
Abração. Sucesso!
@Vanderson⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻⸻ Opa Vanderson, aí você pode simplesmente colocar o "Ponto e Vírgula" ; para separar os emails, por exemplo:
email1@provedor.com;email2@provedor.com;email3@provedor.com
Abração!
Usando essa macro seria possível adicionar anexo?
OBrigada pelo video.. nos salvou! tem algum codigo para diminuir o zoom da imagem do corpo do email. O dashboard esta chegando bem grande no email. OBrigada!
Show show! O Tamanho da imagem segue "mais ou menos" o tamanho das células no excel, então se você diminuir as células no excel, provavelmente irá diminuir também na hora de colar no email.
Abraço.
@@YeraExplica era isso mesmo. Obrigada ❤️
Olá, tem como colocar a assinatura do outlook ?
Aula muito boa! Parabéns! Agora, consigo inserir alguma mensagem de texto no email?
Valeu Paulo! Como você pode mandar a própria seleção do Excel, minha sugestão é colocar o texto direto nessa seleção para ele enviar automaticamente. Mas Existem outras maneiras via VBA de inserir a mensagem sim, como por exemplo a propriedade item.introduction = "meu texto do email"
Abração. Sucesso.
Muito bom! Pode me passar o codigo em vba para colocar outro e-mail em cópia?
Fala Eleir! Tudo bom? Pra colocar um email em cópia, você pode adicionar essa linha dentro do with do MailEnvelope
.Item.cc = "emailEmCópia@email.com"
isso antes do Send.
Abração!
OPA, ÓTIMO CONTEÚDO!
ME TIRE UMA DÚVIDA, POR FAVOR: É POSSIVÉL FAZER ISSO EM RESTAURANTES, ONDE VARIOS CLIENTE SIMUNTANEOS ACESSEM A PLANILHA VIA CRCode (celular) E AO ESCOLHER O PEDIDO, CHEGUE UM E-MAIL PARA A COZINHA? SE SIM, ONDE EU ACHO CONTEÚDO SOBRE?
Opa Deivid, tudo bom? Vou ser sincero contigo meu caro, possível é sim. Porém, eu acredito que pela complexidade, talvez seja mais interessante você pesquisar programas já prontos e específicos para isso. Provavelmente são pagos, porém pela segurança e integridade do seu negócio (até para emissão de notas fiscais e tudo mais...) acredito que valha a pena. Devem existir sistemas MEGA caros, e outros mais acessíveis também.
Resumindo: Possível é sim, mas não aconselho fazer isso com planilha, por conta das funcionalidades necessárias.
Abração. Sucesso!
Show! Eu só precisava do código que trocasse o "DE" porque no meu outlook tenho dois e-mails diferentes cadastrados e nem sempre quero mandar do mesmo e-mail.
Maravilha Anni! Existem algumas formas de fazer que envolvem alguns códigos um pouquinho mais complexos, mas nada de terrível assim rsrs.. Sugiro tentar implementar essa opção aqui: pt.stackoverflow.com/questions/453055/como-alterar-com-vba-o-e-mail-do-remetente-e-inserir-a-assinatura-para-disparo-d
Depois me conta se deu certo.
Abração. Sucesso!
Excelente! Caso fosse enviado para mais pessoas usaria qual caracter pra fazer a separação?
Valeu Allan! Pra mais de um endereço pode utilizar o ; (ponto e vírgula).
Então ficaria "email1@provedor1.com;email2@provedor2.com;etc"
Abraço!
Yera Explica obrigado!
tem como gerar relatorio e enviar em anexo pdf, da mesma forma demonstrada? Gostaria de poder enviaf relatorio para os representantes espalhados pelo Brasil
Opa Gilson! Tem sim, mas teria que fazer uma modificação no código. Você primeiro teria que mandar o excel imprimir como PDF e depois anexar esse PDF no email.
Para imprimir em PDF você pode utilizar esse código exemplo:
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False, PrToFileName:=ActiveWorkbook.Path & "\Print.pdf"
Essa linha de código irá imprimir em PDF o seu arquivo, direto na mesma pasta onde está salvo o seu Excel.
Após ter impresso em PDF, no código de enviar email, você adiciona essa linha
ActiveSheet.MailEnvelope.Item.Attachments.Add (ActiveWorkbook.Path & "\Print.pdf")
Essa linha vai fazer com que seja adicionado como anexo, o seu arquivo impresso que ele vai buscar na mesma pasta onde está o seu Excel + o nome "Print.pdf"
Espero ter ajudado.
Grande abraço!
@@YeraExplica Muito Obrigado!Você além de responder tambem explica.
Olá boa noite,
Eu gostaria de saber se é possível eu enviar as células selecionadas naquele momento, e não definir o Range ("A1:L50") por exemplo.
Fala Fernando! Tudo certo? Tem sim meu caro, basta você tirar a linha de código que está selecionando um intervalo específico. Dessa forma, o código vai sempre pegar de forma dinâmica a seleção que está naquele momento.
Abração! Sucesso!
Amigão, como insiro uma variavel (Dim Nome As String) no assunto?
Fala Thiago! Você pode colocar a variável direto no subject, por exemplo:
Dim nome as string
nome = "Meu nome que coloquei na variável"
with ActiveSheet.MailEnvelope
.Item.Subject = nome
end with
Abração.
Sucesso!
@@YeraExplica Eu fiz uma aplicação na empresa onde traballho. Compartilho uma planilha pelo onedrive com todos trabalhadores para que eles possam abrir as ordens de serviço. Coloquei essa função para enviar um email automaticamente quando a pessoa abrir a ordem de serviço. Porém, algumas vezes o email nao é enviado. o que poderia estar ocorrendo?
@@thiago27054 Opa Thiago, show de bola. Minha sugestão seria avaliar primeiro se é sempre com a mesma pessoa que dá o problema. Com esse código de VBA, a planilha usa o próprio Outlook para enviar o email, então se tiver algum problema com o outlook ou se naquele exato momento a pessoa está sem conexão, provavelmente deve ficar um "rascunho" na caixa de email. Fora isso, precisaria de mais dados pra tentar entender o que está acontecendo.
Abraço! Sucesso!
Fale Grande Yera, é possível enviar junto uma planilha com os dados em anexo no e-mail, constando apenas os dados de cada região?
Fala Rodrigo! É possível sim, não tenho um vídeo pronto com isso, mas a minha sugestão seria:
Após filtrar os dados (que nesse vídeo já mostra), criar uma lógica no VBA que copie esses dados filtrados para um novo arquivo, salve o arquivo e depois envia como anexo para ter só os dados selecionados. Faz sentido?
Abração!
Sucesso!
@@YeraExplica Yera, consegue gravar esse vídeo? Nossa iria me ajudar muiiiiiiiiiiiiiiiiiiito, como também a outras pessoas
Tem como por um código para o Excel abrir um documento Word, extrair o texto e depois colar o texto no corpo do e-mail?
Bom dia, ótimo! Uma pergunta, como programo uma hora para envio diariamente desse e-mail, caso ele tenha tido alguma alteração somente, sem que eu precise entrar lá e enviar?
Obrigado Larissa! Dá uma olhadinha nesse vídeo que acredito que possa te ajudar:
ruclips.net/video/t1TTHd7E2po/видео.html
Abração! Sucesso!
Tem algum jeito de mandar sem precisar entrar no excel e clicar um botão da macro?
Poxa, achei bacana demais pq é justamente o que eu tô precisando no meu trabalho. Pode entrar em contato comigo? Por favor
Opa Denis, tudo bom? Qualquer coisa pode entrar em contato pelo meu email yeraexplica@gmail.com
Abraço!
@@YeraExplica Sim, nos falaremos sim. Abraço.
Como eu faria pra por exemplo enviar um email diario sempre respondendo o mesmo email? Nao sei se deu pra entender mas tipo, vc faz envia um relatorio para seu chefe, ai todo dia vc envia um novo relatorio sempre respondendo o ultimo relatorio enviado. Tem como fazer isso?
Lucas, tenho o outlook na maquina mas não tenho email configurado a ele. embora tenha a planilha no PC o meu email de envio é office365, como posso fazer para enviar. pode me ajadar?
Opa Gesser, tudo bom? O email que eu usei nesse exemplo é do Gmail. Pra configurar o gmail no seu outlook você pode serguir alguns tutoriais aqui do youtube mesmo ou pelo suporte do próprio google como este artigo aqui:
support.google.com/mail/answer/7126229?hl=pt-BR
Depois me conta se deu certo =)
Abração! Sucesso!
Minha assinatura já está configurada no Outlook mas não está indo
Oi Silvano, com esse método, você vai ter que concatenar a sua assinatura na planilha mesmo. Ele não pega a assinatura automaticamente com esse envio de email. Abração.
grande conseguimos fazer isso utilizando o gmail?
Opa Vinicius, tudo bom? Conseguimos sim, esse meu exemplo aí é utilizando o gmail. Porém o meu gmail está configurado no outlook, e por isso a macro envia através do aplicativo do outlook, utilizando a conta gmail.
Então pra você usar essa macro, você precisaria configurar o Gmail com o Outlook.
Sucesso!
Grande abraço!
@@YeraExplica Boa, valew vou testar!! Sucesso!
Sobre como enviar com um clique você não mostrou nesse vídeo, tem outro vídeo que você passa essa informação?
Opa Matheus, tudo bom? Com a macro já pronta, basta você vincular a macro em alguma imagem ou forma na sua planilha. Para fazer isso você precisa por exemplo:
1 - ir no menu Inserir Forma (Pode ser um retângulo para representar um botão)
2 - Clicar com o botão direito nessa forma e ir em Atribuir Macro.
3 - Selecionar a macro que você criou pelo nome dela.
Com esses 3 passos você cria o botão e aí é só formatar a forma do jeito que preferir.
Abraço!
Muito obrigada! Conteúdo excelente!
Por favor, vc sabe como incluir a classificação de confidencialidade da mensagem para "Confidencial"?
Obrigada :)
As imagens estão indo bagunçadas para o Outlook.. pode me ajudar? Mesmo definindo range
Opa Tarcísio, manda pra mim um email no yera@yeraexplica.com que tento te ajudar por lá, pode ser? Abraço!
Yera, adoro seus vídeos! Sua didática é incrível. Parabéns pelo trabalho.
Eu tenho uma dúvida... é possível exportar para o excel informações extraídas de sistemas? Trabalho em uma montadora e desenvolvi alguns relatórios que hoje atualizo na mão porque ainda não consegui achar um jeito de extrair as informações de um sistema interno que temos para atualizar essas relatórios de forma automática.
Abraço!!
Obrigado pelo feedback Geovana!
Quanto a dúvida, vamos lá: Existem algumas maneiras de fazer isso sim, vou citar 2 que acredito ser mais práticas, uma mais "fácil" e outra um pouco mais complexa mas também mais performática.
A primeira forma seria você ver a possibilidade de extrair um relatório do próprio sistema (arquivo txt, ou csv) e importar no seu excel (e talvez precise de uma macro para formatar os dados do jeito que você apresenta), mas pode te resolver.
A segunda forma seria você ter acesso ao banco de dados do sistema (oracle, sqlserver, tem que ver como o sistema trabalha) e fazer via VBA a consulta direta no banco de dados.
Essa forma é a mais performática, porém, a mais "difícil", tanto pela complexidade maior da macro, quanto pelo acesso ao banco de dados, que nem sempre, é dado para todas as áreas da empresa.
Espero ter dado o caminho das pedras, rsrs.
Abraço!
Ajudou sim! Tenho interesse em aprender mais coisas sobre... você dá aulas?!
Oi Geovana! Show de bola. Por enquanto estou dando aulas só aqui no canal mesmo. Se tiver algum tema para sugerir pode me enviar que estudamos juntos. Abraço!
Olá, eu tenho um texto grande e gostaria de usar a formula que você ensinou, porém o Outlook faz o envio sem quebra de linha automática e com isso o e-mail é recebido pelo destinatário com "texto corrido" ou seja, sem mudar de linha. Teria alguma forma de corrigir isso? Obrigado !
Opa Carlos, tudo bom? Uma forma prática de fazer isso é utilizar o código chr(10) para quebra de linha, que é o código do "enter" pro computador.
Então ficaria mais ou menos assim no VBA:
Mensagem = "Texto da linha 1" & chr(10) & "Texto da linha 2" & chr(10) & "Texto da linha 3"
Essa mensagem seria mostrada assim:
Texto da linha 1
Texto da linha 2
Texto da linha 3
Seria isso?
Depois me conta se deu certo.
Abração, Sucesso!
BODY EM BRANCO, COMO PASSAR PARA O VBS PRA PEGAR A ASSINATURA DO E-MAIL?
Opa Paulo, tudo bom? Essa aí é um pouco mais complexa hehe.
Minha sugestão: Se for apenas 1 assinatura, você poderia colocar no excel (num intervalo de células mesmo) e usando esse mesmo método do vídeo você poderia concatenar a assinatura no final da mensagem.
Se você quiser as assinaturas de forma dinâmica de quem está enviando, aí minha sugestão é fazer com outro código explorando a opção de criar os objetos Outlook.Application e Outlook.MailItem.
Eu ainda não tenho um vídeo específico disso, mas se você procurar no google algo do tipo "VBA EXCEL OUTLOOK.APPLICATION" você deve encontrar alguns exemplos em outros canais.
Espero ter dado o caminho das pedras.
Abração!
Olá, estou com um problema no meu trabalho sobre referência do outlook usando o vba para enviar email... o problema são as versões diferentes para usuários, quando eu crio o arquivo ele fica com a referência do office 2016 e quando o usuário vai abrir o arquivo ele está usando office 2013 e ai da erro na referência, tendo que mudar manualmente para funcionar.
Existe algum código vba que possa trocar essa referência automática?
Obrigado
Opa Rogério, consegue me enviar um email para o yeraexplica@gmail.com? Por lá fica mais fácil de te ajudar nesse assunto.
Abraço!
Excelente conteúdo, como sempre!
Dúvida: como posso condicionar o e-mail destinatários a uma célula? De modo q eu não precise abrir o código cada vez que eu quiser mudar o destinatário?
Me heeelp! Please hahaha
Opa Tarcísio, tudo certo? Show de bola, pra fazer isso, você pode mudar a seguinte parte do código:
ao invés de deixar fixo o email como:
ActiveSheet.MailEnvelope.Item.to = "emailPara@provedor.com"
você pode alterar para:
ActiveSheet.MailEnvelope.Item.to = activesheet.range("A1")
dessa forma, ele vai buscar o endereço que estiver na célula A1. E lá você pode deixar vários emails separados por Ponto e Vírgula, por exemplo: email1@provedor.com ; email2@provedor2.com ; email3@provedor3.com
Espero ter ajudado meu caro.
Abraço!
Sucesso!
@@YeraExplica maravilha! Vai ajudar demais! Estou interessado (se houver) em cursos pagos! Parabéns pelo trabalho!
Show de bola Tarcísio, por enquanto só tenho um curso básico disponível na Udemy que se chamada Excel Essentials. Mas ali eu não abordo VBA. Abraço, sucesso!
@@YeraExplica parabéns pelo conteúdo! Isso salva vidas! Haha.. abs
Duvida, como enviar o arquivo do Excel anexo ?
Opa, tem sim! Você pode utilizar o comando dentro do with
.Item.attachments.Add ("caminho do arquivo C:\blablabla.xlsx")
Depois me conta se deu certo.
Abração.
Sucesso!
Olá,
Para essa finalidade é desnecessário VBA, pois temos essa funcionalidade NATIVA!!
Abraços
Valeu Rodrigo. Abraço!
Como deixar essa funcionalidade de seleção e envio de e-mail ativo independente de acionar a macro ou não?