Como enviar um e-mail a partir de um intervalo específico de células no Excel?
Muitas vezes, precisará de partilhar dados ou relatórios importantes diretamente a partir da sua pasta de trabalho do Excel, e incluir um intervalo específico de células no corpo do e-mail pode poupar-lhe tempo e garantir precisão. Por exemplo, ao enviar resumos financeiros selecionados, notas de alunos ou dados de inventário diretamente do Excel, os destinatários conseguem visualizar imediatamente a informação essencial sem ter de abrir um anexo. Este artigo apresenta métodos práticos para enviar um e-mail com um intervalo selecionado incorporado no corpo da mensagem, ajudando-o a agilizar a comunicação e a partilha de dados diretamente a partir do Excel.
Enviar e-mail a partir de um Intervalo limitado de células no Excel
Enviar e-mail a partir de um Intervalo limitado de células com uma ferramenta extraordinária
Mais tutoriais sobre envio de e-mails no Excel...
Enviar e-mail a partir de um Intervalo limitado de células no Excel
Se preferir uma abordagem integrada e personalizável, utilizar código VBA no Excel é uma forma eficiente de copiar o intervalo de células selecionado e colá-lo automaticamente no corpo de um e-mail do Outlook. Este método é ideal para quem utiliza regularmente o Microsoft Outlook como cliente de e-mail e pretende automatizar o envio de mensagens diretamente a partir do Excel. Eis como o pode fazer:
1. Abra a folha de cálculo que contém o intervalo de células que pretende incorporar no seu e-mail. Prima simultaneamente Alt + F11 para abrir a janela Microsoft Visual Basic para Aplicações. Este atalho dá-lhe acesso rápido ao editor VBA, onde irá inserir o código.
2. Na janela do editor VBA, clique em Ferramentas > Referências. Certifique-se de que seleciona o livro de trabalho correto, especialmente se tiver vários ficheiros abertos.
3. Na caixa de diálogo Referências – ProjetoVBA, desloque-se até encontrar e marque a opção Biblioteca de Objetos do Microsoft Outlook. Ao ativar esta referência, o VBA passa a poder interagir com o Outlook, permitindo-lhe criar e enviar e-mails diretamente. Após marcar a caixa, clique em OK.
4. Na barra de menu, clique em Inserir > Módulo para adicionar um novo módulo de código. Em seguida, copie e cole o seguinte código VBA na janela do módulo.
Código VBA: Enviar e-mail com um Intervalo limitado no Excel
Sub Send_Email()
'Updated by Extendoffice 20200119
Dim xRg As Range
Dim I, J As Long
Dim xAddress As String
Dim xEmailBody As String
Dim xMailOut As Outlook.MailItem
Dim xOutApp As Outlook.Application
On Error Resume Next
xAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select range you need to paste into email body", "KuTools For Excel", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
Set xOutApp = CreateObject("Outlook.Application")
Set xMailOut = xOutApp.CreateItem(olMailItem)
For I = 1 To xRg.Rows.Count
For J = 1 To xRg.Columns.Count
xEmailBody = xEmailBody & " " & xRg.Cells(I, J).value
Next
xEmailBody = xEmailBody & vbNewLine
Next
xEmailBody = "Hi" & vbLf & vbLf & " body of message you want to add" & vbLf & vbLf & xEmailBody & vbNewLine
With xMailOut
.Subject = "Test"
.To = "happy.xuebi@163.com"
.Body = xEmailBody
.Display
'.Send
End With
Set xMailOut = Nothing
Set xOutApp = Nothing
Application.ScreenUpdating = True
End SubNotas:
- 1). Pode personalizar o conteúdo e a saudação na linha xEmailBody = «Hi» & vbLf & vbLf & " body of message you want to add" & vbLf & vbLf & xEmailBody & vbNewLine conforme necessário. Por exemplo, pode querer incluir uma mensagem específica ou instruções antes dos dados do Excel.
- 2). Ajuste o destinatário e o assunto alterando esta linha: .To = happy.xuebi@163.com e .Subject = «Test». Certifique-se de que o endereço de e-mail do destinatário está correto para evitar problemas de entrega.
5. Para executar o código, prima F5 no editor VBA. Quando aparecer a caixa de diálogo Kutools para Excel, escolha o intervalo de células que pretende incluir no corpo do e-mail e clique em OK. Se selecionar o intervalo errado, pode reiniciar o processo ou ajustar a sua seleção.
6. Será gerado automaticamente um e-mail do Outlook com o destinatário, assunto, mensagem inserida e os dados do Excel incluídos no corpo da mensagem. Pré-visualize o e-mail antes de enviar para garantir que todos os dados estão corretamente apresentados. Clique no botão Enviarpara entregar a sua mensagem.
Nota: Este método VBA só funciona quando o Microsoft Outlook está instalado e definido como cliente de e-mail predefinido. Se utilizar outros programas de e-mail, considere uma solução alternativa, conforme descrito abaixo. Além disso, se o Outlook não estiver em execução, a macro inicia-o automaticamente.
Limitações: Requer o Outlook e as permissões adequadas para aceder à funcionalidade de e-mail. Caso a sua organização restrinja o uso de macros ou o acesso ao Outlook, este método poderá não ser aplicável.
Enviar e-mail a partir de um Intervalo limitado de células com uma ferramenta extraordinária
Para utilizadores que não usam o Outlook ou preferem uma solução mais simples e sem código, o Kutools para Excel oferece uma forma direta de enviar mensagens de e-mail com intervalos de células selecionados. A funcionalidade «Enviar E-mail» do Kutools permite configurar um servidor de saída (SMTP) e enviar e-mails através de qualquer conta suportada — como Gmail, Yahoo ou correio corporativo — diretamente a partir do Excel, tornando-a numa opção versátil para trabalhar em ambientes diversos ou partilhar informação com múltiplos destinatários.
Para utilizar este método, siga os seguintes passos:
1. Em primeiro lugar, tem de preparar uma lista de e-mails com os campos necessários.
- Dicas:A sua Lista de Emails precisa de, pelo menos, duas linhas: uma para os cabeçalhos e outra(s) para os dados reais. Por exemplo, ao enviar e-mails a duas pessoas, inclua ambos os endereços sob o cabeçalho «E-mail», conforme ilustrado na captura de ecrã abaixo.
- Se pretender criar uma lista de emails rapidamente, experimente a funcionalidade Criar Lista de Correspondência para uma configuração automatizada.
2. De seguida, selecione o intervalo real do Excel que pretende colar no corpo da mensagem de e-mail e prima Ctrl + C para o copiar. Certifique-se de que copia apenas as células necessárias, garantindo assim clareza na sua mensagem.
3. Selecione toda a lista de e-mails (incluindo os cabeçalhos) e vá a KUTOOLS PLUS > Enviar E-mails.
4. Aparecerá a caixa de diálogo «Enviar E-mails», com os campos preenchidos com base na sua Lista de Emails selecionada.
- 4,1) Reveja e ajuste os itens na caixa de diálogo conforme necessário. Pode adicionar mais campos à Lista de Emails se precisar de mensagens personalizadas ou informações adicionais.
- 4,2) Clique dentro da caixa «Corpo do e-mail» e prima Ctrl + V para colar o intervalo copiado. Adicione qualquer texto ou instrução adicional, se necessário, garantindo que a mensagem do e-mail seja clara e informativa.
- 4,3) Certifique-se de que a opção «Enviar usando o Outlook» está desmarcada se pretender enviar através de SMTP (outros serviços de e-mail).
- 4,4) Clique em Configurações SMTP para configurar as definições SMTP da sua conta de e-mail, o que é necessário para enviar mensagens diretamente a partir de contas que não sejam do Outlook.
5. Na caixa de diálogo «Configurações do Servidor de Email (SMTP – Novo Esquema)», preencha todos os detalhes necessários, como o seu endereço de email, servidor SMTP, número da porta e credenciais de autenticação. Pode ainda optar por guardar os e-mails enviados numa pasta específica, marcando a caixa «Salvar Emails Enviados em», o que facilita o acompanhamento das suas comunicações. Após concluir as definições, clique em OK para confirmar.
6. Regressará à janela «Enviar E-mails». Verifique novamente todos os campos e o conteúdo colado quanto à exatidão e, em seguida, clique em Enviar para entregar o seu e-mail. O e-mail será enviado através do servidor configurado diretamente do Excel e verá uma confirmação ou estado consoante o resultado.
Vantagens: O Kutools permite enviar e-mails a partir de praticamente qualquer conta compatível com SMTP — não só do Outlook —, tornando-o perfeito para utilizadores que recorrem a webmail, trabalham com múltiplos domínios ou procuram uma interface intuitiva sem precisar de programar macros.
Ao utilizar o Kutools, verifique atentamente as definições do seu servidor para evitar falhas na entrega de e-mails. Caso as mensagens não sejam enviadas, confirme a conectividade de rede, o endereço do servidor, a porta e as credenciais de início de sessão.
Para envios em massa, visualize sempre pelo menos uma mensagem antes do envio generalizado, de modo a corrigir eventuais problemas de apresentação ou personalização.
Artigos relacionados:
Enviar e-mails para endereços de e-mail especificados em células no Excel
Imagine que tem uma lista de endereços de e-mail e pretende enviar mensagens a esses destinatários em massa diretamente a partir do Excel. Como o fazer? Este artigo mostra-lhe métodos para enviar e-mails para múltiplos endereços de e-mail indicados em células do Excel.
Inserir assinatura do Outlook ao enviar e-mail no Excel
Imagine que pretende enviar um e-mail diretamente a partir do Excel. Como pode adicionar a assinatura predefinida do Outlook nesse e-mail? Este artigo apresenta-lhe dois métodos para incluir facilmente a assinatura do Outlook ao enviar e-mails no Excel.
Enviar e-mail com múltiplos anexos no Excel
Este artigo explica como enviar um e-mail através do Outlook com vários anexos diretamente a partir do Excel.
Enviar e-mail quando a Data de Vencimento for cumprida no Excel
Por exemplo, se a data de vencimento na coluna C for menor ou igual a 7 dias (a data atual é 2017/9/13), envie um lembrete por e-mail para o destinatário indicado na coluna A com o conteúdo especificado na coluna B. Como fazer isso? Este artigo apresenta, em detalhe, um método em VBA para resolver esta situação.
Enviar e-mail automaticamente com base no valor de uma célula no Excel
Imagine que pretende enviar um e-mail através do Outlook para um destinatário específico assim que uma célula no Excel atingir um determinado valor. Por exemplo, sempre que o valor da célula D7 numa folha de cálculo for superior a 200, é criado automaticamente um e-mail. Este artigo apresenta um método VBA para resolver este desafio de forma rápida e eficaz.
Mais tutoriais sobre como enviar e-mails diretamente do Excel...
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos